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EXECUTIVE  SUMMARY 


A.  BACKGROUND.  The  Army  has  learned  that  competition  is  desirable  in  general 
for  the  production  of  its  weapons,  but  that  it  must  be  evaluated  on  a  case-by- 
case  basis  before  it  is  applied.  This  guidance  is  intended  to  give  the  analyt¬ 
ical  staff  of  a  typical  project  manager  a  framework  for  the  analysis  of  produc¬ 
tion  competition* 

R.  OBJECTIVE.  :The  objective  of  this  study  is  therefore  to  develop  this  guid- 
ance  to  allow  the  rigorous  comparison  of  competitive  and  non-competitive  alter¬ 
natives  and  evaluate  the  relative  benefits  and  risks  of  these  alternatives. 
The  product  is  to  consist  of  an  instructional  guide  with  a  program  to  be  used 
by  decision-makers  onsite. 


C.  SCOPE .  The  research  plan  called  for  analyzing  competitive  effects  and  inte¬ 
grating  the  best  features  of  various  approaches  in  a  set  of  guidance  instruc¬ 
tions.  The  economic  analysis  was  programmed  in  a  computerized  decision  model. 


D.  CONCLUSIONS  AND  RECOMMENDATIONS.  -'The  result  of  the  study  effort  was  the 
preparation  of  a  proposed  pamphlet  designed  to  guide  the  project  manager  in 
his  analysis  of  competitive  issues*  It  is  recommended  that  DARCOM  adopt  this 
guidance  and  promulgate  it  in  a  OriftOQM  Pamphlet,  715-XX  series. 
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CHAPTER  I 


INTRODUCTION 


A.  BACKGROUND. 

Competition  is  a  fundamental  principle  of  American  society.  It  is  a  con¬ 
cept  that  pervades  all  avenues  of  American  life.  By  its  nature  it  brings  on 
the  virtue  of  efficiency,  economy,  and  innovation.  Consequently,  competition 
among  firms  is  sought  on  the  production  of  every  Army  weapon  system.  Unfortu¬ 
nately,  history  has  shown  us  that  competition  is  not  an  absolute  good  in  Army 
acquisition.  That  is,  it  is  not  always  possible  or  appropriate.  For  example, 
the  expertise  required  for  a  weapon  system  may  be  held  by  only  one  firm,  or 
the  investment  required  for  two  producing  firms  prohibitive. 

The  Army  has  learned  that  competition  is  indeed  desirable  in  general  for 
the  production  of  its  weapons,  but  that  it  must  be  evaluated  on  a  case-by-case 
basis  before  it  is  applied.  Further,  there  are  many  variations  of  production 
competition  that  must  be  considered.  Because  of  the  importance  of  the  competi¬ 
tive  decision  and  its  high  visibility  in  both  government  and  industry,  acquisi¬ 
tion  decision  makers,  typically  project  managers  (PM),  make  studies  of  competi¬ 
tion  on  their  particular  projects. 

The  analysis  required  is  often  complex,  and  PM's  may  be  concerned  about 
the  ability  of  their  staff  to  perform  a  study  that  will  withstand  scrutiny  or 
the  efficacy  of  hiring  consultants  to  handle  such  a  critical  part  of  their 
acquisition  strategy.  It  is  toward  these  concerns  that  the  enclosed  guidance 
was  developed.  This  guidance  is  intended  to  give  the  analytical  staff  of  a 
typical  project  manager,  perhaps  augmented  by  supporting  command  di rectorates , 
a  framework  for  the  analysis  of  production  competition.  Using  this  guidance 


gives  the  PM  the  assurance  of  having  an  accepted  analytical  approach  with 
higher  likelihood  of  accuracy  and  avoids  the  necessity  of  bringing  in  outside 
help  to  handle  sensitive  project  data. 

This  guidance  is  based  on  the  research  and  consultation  experience  of  the 
Army  Procurement  Research  Office  (APRO)  and  APRO's  survey  of  Army  experience 
on  competition  in  general.  It  covers  the  economic  and  noneconomic  aspects  of 
competition  in  a  systematic  framework. 

R.  STUDY  OBJECTIVE. 

The  objective  of  this  study  is  therefore  to  develop  this  guidance  to  allow 
the  rigorous  comparison  of  competitive  and  non-competitive  alternatives  and 
evaluate  the  relative  benefits  and  risks  of  these  alternatives. 

C.  STUDY  APPROACH. 

This  study  evaluated  the  various  approaches  to  analyzing  competitive  ef¬ 
fects  and  brought  forward  the  best  features  in  an  integrated  set  of  guidance 
instructions.  The  economic  analysis  lent  itself  to  the  use  of  a  cost  model 
and  programming.  After  the  model  was  developed,  an  interactive  program.  Compe¬ 
tition  Decision-Assist  Package  (CDAP),  was  written  to  allow  the  processing  of 
the  individual  project  data.  The  non-economic  issues  were  found  to  be  judg¬ 
mental  in  nature  and  suggestions  toward  analyzing  each  issue  are  given.  None¬ 
theless  the  non-economic  portion  of  the  analysis  will  be  incorporated  in  CDAP 
1 ater. 

The  results  of  the  study  were  synthesized  into  guidance  on  how  to  make  the 
competitive  decision. 

D.  ORGANIZATION  OF  REPORT. 

The  report  is  modest  in  design.  Chapter  II  will  describe  the  development 
of  guidance.  Chapter  III  discusses  the  use  of  the  guidance.  The  Appendix  is 
the  guidance  itself  in  the  form  of  a  draft  pamphlet. 


CHAPTER  II 


DEVELOPING  THE  GUIDANCE 


A.  GENERAL. 

The  analysis  of  competitive  alternatives  is  complex  and  filled  with  uncer¬ 
tainty  because  it  speculates  on  the  impact  of  competition  on  a  sophisticated 
system  on  a  number  of  economic  and  non-economic  issues  over  a  relatively  long 
period  of  time  in  the  future.  The  attempt,  of  course,  is  to  find  the  most 
accurate  and  reliable  analytical  approach  for  the  Army.  Experience  has  shown 
that  the  competitive  decision  must  be  made  on  a  number  of  criteria.  Recent 
decisions  have  successfully  grouped  these  criteria  into  economic  and  non-eco- 
nomic.  The  analysis  of  non-economic  issues  is  fairly  straight-forward  sys¬ 
tematic  judgment.  The  economic  analysis  requires  more  treatment.  This  chapter 
discusses  the  rationale  for  the  guidance  selected. 

R.  GUIDANCE  FOR  ECONOMIC  ANALYSIS. 

Typically  the  competition  of  weapon  system  production  requires  investment. 
The  economic  analysis  of  competitive  alternatives  involve  the  comparison  of 
non-recurring  cost  (i.e..  Government  investment)  and  recurring  cost  savings. 
Is  the  amount  of  savings  worth  the  investment? 

The  estimation  of  non-recurring  cost  comes  from  the  judgment  of  costs 
based  on  data  on  the  system  and  the  contractors  involved.  The  guidance  will 
describe  the  processing  of  the  data  and  the  type  of  judgments  needed. 

The  recurring  cost  analysis  is  more  complex.  Actually  there  are  a  number 
of  alternatives  for  analyzing  this  cost.  The  first  alternative  is  regression 
analysis.  An  initial  reaction  to  predict  savings  is  to  predict  the  competitive 


price  and  compare  it  to  the  sole  source  price.  An  approach  found  in  the  liter¬ 
ature  is  a  regression  model  with  the  competitive  price  as  the  dependent  vari¬ 
able  and  other  leading  indicators  (e.g.,  sole  source  price,  quantity  remaining) 
as  predictor  variables. [1,3, 5]  Unfortunately,  the  data  has  not  supported  a 
general  theory  explaining  competitive  pricing  as  a  function  of  these  leading 
indicators. 

A  more  direct  and  simple  approach  is  to  compare  submitted  and  imputed  cost 
data  from  the  incumbent  and  potential  new  sources  for  the  competition  at  hand. 
[2]  Unfortunately,  this  data  is  not  always  available.  Moreover,  objectivity 
is  suspect  and  not  particularly  reliable  over  a  number  of  years  in  the  future. 
As  competition  information  is  somehow  exchanged,  contractors  tender  new,  often 
drastically  different  data.  Another  disadvantage  is  that  the  new  source  data 
does  not  include  production  experience  gained  by  the  incumbent. 

A  third  alternative  is  to  try  to  recover  the  competitive  savings  history 
from  previous  competitions  while  considering  the  savings  potential  of  the 
immediate  program  by  projecting  cost  behavior  of  the  firms. [4, 5]  In  this 
approach  the  cost  improvement  curve  slope  for  a  firm  in  a  sole  source  environ¬ 
ment  is  contrasted  with  the  curve  slope  of  a  firm  in  a  competitive  environment. 
These  slopes  are  derived  from  the  data  base  of  previous  competitions  and  cost 
data  of  the  incumbent  and  prospective  firms. 

The  cost  improvement  methodology  was  selected  for  the  competition  guidance 
because  it  has  fewer  disadvantages  than  the  alternatives  and,  in  fact,  has  met 
with  more  operational  success.  This  approach,  however,  does  require  experi¬ 
enced  judgment,  from  outside  the  organization  if  in-house  expertise  is  not 
available.  The  guidance  will  describe  how  to  use  the  cost  improvement  methodo¬ 
logy  in  detai 1 . 


C.  GUIDANCE  FOR  NON-ECONOMIC  ANALYSIS. 


Although  one  normally  thinks  of  competition  in  terms  of  cost  savings, 
competition  has  many  non-cost  impacts.  One  of  the  contributions  of  the  guidance 
will  be  a  list  of  the  main  factors  found  to  be  relevant  to  the  competitive 
decision. 

The  first  is  quality  or  reliability  risk.  A  buying  activity  must  ask 

whether  a  new  firm  can  make  an  item  of  the  same  quality  as  the  incumbent  firm. 
The  primary  factors  to  be  evaluated  are  complexity  of  the  system  to  be  purchased, 
the  condition  of  the  technical  data  paackage  describing  the  system  to  be 

produced,  and  the  technical,  financial,  and  managerial  capability  of  the  pro¬ 
spective  firms. 

Even  though  a  firm  may  be  able  to  make  an  item,  there  is  a  possibility  it 

may  not  be  able  to  make  it  in  the  time  required.  The  schedule  risk  is  a  function 

of  the  above  factors,  the  prospective  new  vendor  structures,  the  amount 
of  proprietary  data,  and  the  project  management  office's  ability  to  administer 
additional  producers  (e.g.,  configuration  management).  Mobilization  may  be 
affected  by  competition.  The  analyst  will  have  to  establish  whether  mobiliza¬ 
tion  is  an  issue  for  the  system  and,  if  it  is,  the  impact  of  the  competitive 
strategy  on  the  time  and  cost  of  reaching  mobilizating  rate  and  the  effect  on 
surge  capability. 

Other  factors  are  often  relevant  in  a  given  situation.  Memoranda  of 
Understanding  agreements  may  be  affected.  Existing  arrangements  with  the  prime 
such  as  warranties  may  influence  the  decision.  Acquisition  management  (e.g., 
contractor  cooperation)  can  be  greatly  enhanced  by  competition.  Assessing 
these  non-economic  factors  is  largely  a  matter  of  judgment.  Analysts  must 
review  these  factors  and  the  data  concerning  them  and  associate  a  level  of  risk 


with  each  factor.  The  guidance  reflects  this  approach  and  has  an  option  for 
those  wanting  to  prioritize  and  score  the  factors  for  total  "scores." 

D.  GUIDANCE  FOR  THE  DECISION. 


On  the  basis  of  the  assessment  of  the  economic  and  non-economic  factors, 
the  analyst  will  derive  a  position  for  recommendation  to  the  decision  maker. 
The  guidance  will  describe  a  display  of  the  information  for  the  decision. 
E.  USAGE  OF  THE  GUIDANCE. 

This  guide  is  designed  to  help  users  assess  in  a  structure  way  the  parti¬ 
cular  conditions  existing  in  their  program.  Underlying  the  guidance  presented 
here  is  a  data  base  composed  of  a  variety  of  systems.  These  systems  were 
primarily  in  the  missile  and  electronics  areas,  and  they  share  the  common 
property  of  actually  having  been  competed  sometime  during  production.  Conse¬ 
quently,  it  may  be  that  peculiarties  of  a  user's  program  are  inadequately 
treated  by  the  guide.  Users  are  expected  to  supplement  the  guide  in  consider¬ 
ing  these  peculiarities. 

The  proper  extent  of  any  effort  to  evaluate  the  probable  effects  of  compe¬ 
tition  depends  on  the  value  of  the  information  gained.  For  very  large  systems 
(with  potentially  very  large  effects  arising  from  the  competition  decision, 
e.g.,  $25  million  and  upward)  it  may  be  justified  to  establish  a  special  team 
to  carry  out  a  more  extensive  evaluation  than  the  guidance  here  provides. 


In  any  event  the  guidance  is  just  that— a  guide,  an  aid  in  focusing  think¬ 
ing  on  the  important  decision  factors.  The  aid  is  used  in  coordination  with 
and  as  a  supplement  to  judgment  to  enhance  the  manager's  decision  making. 


CHAPTER  III 


RECOMMENDATIONS  FDR  IMPLEMENTATION 

The  competition  decision  on  weapon  system  production  is  a  serious  one.  It 
involves  typically  a  large  investment  which  should  be  recovered  by  competitive 
savinys.  The  analysis  is  complex  and  rigorous.  A  mistake  in  judgment  can  be 
costly. 

Expedient  promulgation  of  the  current  CD  :n  a  DARCOM  Pamphlet,  715-XX 
series,  is  recommended  even  though  a  numbe  j '  potential  enhancements  are 
already  envisioned.  These  enhancements  would  improve  on  the  output  presenta¬ 
tion,  expand  the  competition  analysis  capability,  and  increase  the  analytical 
self-sufficiency  in  the  field.  These  improvements  have  been  deferred  in  the 
interest  of  providing  some  guidance  in  this  important  area  in  the  near  future, 
but  it  is  recommended  that  APRO  incorporate  them  into  CDAP  as  part  of  its 
continuing  contribution  to  competition  analysis.  Because  of  the  importance 
of  a  quality  analysis  and  the  fact  that  the  demand  for  these  analyses  has 
increased,  the  kind  of  guidance  described  in  this  study  is  critical. 
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CHAPTER  I 


INTRODUCTION 

A.  GENERAL. 

The  competition  decision  is  a  serious  one  to  a  program  because  its  outcome 
can  affect  program  performance  drastically.  Many  view  competition  as  an 
opportunity  to  save  money.  Others  fear  competition  will  disrupt  the  orderly 
development  of  a  program.  The  fact  is  that  both  of  these  outcomes  can  occur, 
among  others.  What  is  necessary  is  an  analysis  of  each  competitive  situation 
to  allow  anticipation  of  what  might  occur  if  various  competitive  strategies  are 
employed.  In  other  words,  each  decision  must  be  made  on  the  merits  of  the 
individual  case.  This  document  is  written  to  give  decision-makers  the  ability 
to  assess  these  merits. 

Project  Managers  (PM's)  have  approached  this  analytical  problem  in  many 
ways,  ranging  from  a  one-day  effort  by  an  analyst  on  the  staff  of  the  fielding 
of  a  multidisciplinary  team  involved  in  a  sophisticated  and  lengthy  analysis  of 
diverse  issues.  PM's  generally  are  going  to  agree,  however,  that  the  main 
criteria  for  the  design  of  the  analysis  are  rigor,  accuracy,  defensibi 1 ity , 
security,  and  parsimony.  A  framework  that  features  these  criteria  should  be  of 
assistance  to  the  PM  who  may  not  have  the  resources  to  fully  design  the 
appropriate  approach. 

K.  PURPOSE  AND  SCOPE. 

The  purpose  of  this  document  is  provided  the  guidance  to  allow  the  individual 
PM  to  design  his  own  approach.  This  guidance  is  based  on  competition  studies 
recently  completed  in  the  Army.  In  using  this  guidance  the  PM  can  minimize  the 
hiring  of  consultants  and,  at  the  same  time,  save  resources  and  insure  the 


security  of  program  information.  Recause  the  procedures  described  have  already 
been  employed  with  some  success,  the  PM  can  feel  more  confident  in  the  accuracy 
and  defensibi 1 ity  of  the  results. 

Ultimately,  however,  the  usage  of  the  guidance  is  up  to  the  individual 
manager.  This  guide  is  designed  to  help  users  assess  in  a  structured  way  the 
particul ar  conditions  existing  in  their  program.  Underlying  the  guidance 
presented  here  is  a  data  base  composed  of  a  variety  of  systems.  These  systems 
were  primarily  in  the  missile  and  electronics  areas,  and  they  share  the  common 
property  of  actually  having  been  competed  sometime  during  production.  Conse¬ 
quently,  it  may  be  that  peculiarities  of  a  user's  program  are  inadequately 
treated  by  the  guide.  Users  are  expected  to  supplement  the  guide  in  considering 
these  pecul iarities. 

The  proper  extent  of  any  effort  to  evaluate  the  probable  effects  of 
competition  depends  on  the  value  of  the  information  gained.  For  very  large 
systems  (with  potentially  very  large  effects  arising  from  the  competition 
decision,  e.g.,  $25  million  and  upward)  it  may  be  justified  to  establish  a 
special  team  to  carry  out  a  more  extensive  evaluation  than  the  guidance  here 
provides. 

In  any  event  the  guidance  is  just  that--a  guide,  an  aid  in  focusing  thinking 
on  the  important  decision  factors.  The  aid  is  used  in  coordination  with  and  as 
a  supplement  to  judgment  to  enhance  the  manager's  decision-making. 

The  primary  readers  of  this  guidance  should  be  the  project  managers  and  his 
analysis  who  must  agree  on  the  interpretation  of  each  section.  The  appendix 
contains  the  Competition  Decision-Assist  Package  (CHAP)  which  will  be  employed 
by  the  analyst,  but  should  be  understood  by  the  PM. 


In  addition,  the  guidance  can  be  used  by  the  nonprogram  manager,  primarily 
procurement,  who  have  to  make  competition  decisions  on  non-program-inariaged 
items  and  appointed  advocates  ft"  competition.  The  concepts  described  should 
be  applicable  to  any  competition. 

C.  ORGANIZATION  OF  THE  DOCUMENT. 

The  next  chapter  will  describe  competitive  strategies  used  in  production 
and  how  to  select  the  ones  most  favorable  to  an  individual  program.  These 
strategies  will  be  the  ones  evaluated  in  terms  of  cost  and  noncost  issues  in 
the  next  two  chapters.  Consequently,  the  following  chapter  will  describe 
economic  (i.e.,  cost)  issues  and  how  to  evaluate  them,  followed  by  a  chapter  on 
the  evaluation  of  non-economic  issues.  The  last  chapter  is  concerned  with  the 
presentation  of  the  data  for  decision  making  display.  The  appendices  describe 
♦he  CL'Ab  program  and  its  use. 


CHAPTER  II 


COMPETITIVE  PRODUCTION  STRATEGIES 


A.  INTRODUCTION. 

Competition  is  the  rivalry  among  firms  to  obtain  Army  business.  The  Army 
position  should  be  to  encourage  this  rivalry.  There  are  many  alternative 
strategies  for  obtaining  this  competition.  This  chapter  describes  the  most 
effective  competitive  strategies  and  appropriate  conditions  for  their  use.  A 
decision  maker  can  use  this  chapter  to  find  which,  if  any,  of  the  strategies 
are  feasible  and  contrast  these  feasible  strategies  with  the  sole  source 
al ternati ve( s)  to  find  if  savings  and  other  benefits  are  likely  and  risks  are 
acceptable.  Chapters  III  and  IV  are  useful  in  assessing  these  risks  and 
benefi ts. 

R.  TYPES  OF  COMPETITION  STRATEGIES. 

1.  Technical  Data  Package  (TDP). 

The  TDP  strategy  involves  the  competition  between  the  incunbent  and  a 
new  source  with  the  incumbent's  TDP.  The  TDP  is  defined  as  a  technical 
description  of  an  item  adequate  for  use  in  procurement.  This  description 
defines  the  required  design  configuration  and  assures  adequacy  of  item  perfor¬ 
mance.  It  consists  of  all  applicable  technical  data  such  as  plans,  drawings, 
and  associated  lists,  specifications,  standards,  models,  performance  require¬ 
ments,  quality  assurance  provisions  and  pacakaging  data, 
a.  Validated  TDP. 

Definition  alone  is  not  sufficient  for  determining  when  a  TDP  is 
ready  for  competitive  procurement.  Triteria  must  be  established  by  which  the 
competitive  status  of  the  TDP  can  be  judged.  The  term  most  frequently  used  to 


describe  a  TOP  ready  for  competitive  procurement  is  a  validated  TOP.  Other 
phrases  used  also  include  "mature  TOP"  and  "proven  TDP."  (See  p.  34) 

b.  TOP  Risk  on  Initial  Production  Contracts. 

On  the  initial  production  contract  for  Army  hardware,  the  TOP  may 
not  have  been  validated  according  to  the  validation  criteria.  Risks  are  inherent 
in  using  an  unproven  TDP  for  the  first  time  in  production.  The  TDP  may  not 
accurately  describe  a  system  which  can  be  mass  produced  —  resulting  in  thp 
production  of  inferior  equipment,  delays  in  delivery,  and  increased  costs  due 
to  frequent  engineering  changes.  To  counter  these  adverse  effects  the  Army  may 
rely  on  contractual  provisions  to  share  some  of  the  responsibility  for  the 
adequacy  of  the  TDP. 

One  example  might  be  the  inclusion  of  a  Preproduction  Evaluation 
Clause  (PPE)  in  the  initial  contract.  For  further  information,  refer  to  DARCOM 
Pamphlet  715-6,  "Preproduction  Evaluation  (PPE)  Contract,"  5  May  70. 

c.  Implications  for  Usage. 

The  TDP  method  is  the  one  most  often  used  in  the  acquisition  of 
military  equipment.  A  validated  TDP  is  the  most  complete  technical  description 
which  exists  for  military  hardware.  It  has  the  advantage  of  promoting  competi¬ 
tion  in  Defense  procurement  and  supporting  the  aims  of  the  00D  with  respect  to 
standardization  and  interchangeability.  There  is  a  high  probability  that  the 
validated  TOP  is  an  accurate  description  of  hardware  which  mepts  the  npeds  of 
the  user.  But  the  TOP  is  no  panacea.  It  is  very  difficult  to  prepare  a  document 
of  such  technical  detail  without  omitting  some  essential  feature.  Additional ly , 
the  manufacture  of  complex  equipment  usually  entails  more  than  documentpu 
instructions.  "Know-how"  is  an  intangible  related  to  the  production  of  an  itnm 


which  cannot  be  put  down  on  paper.  The  TOP  may  also  include  proprietary  features 
which  may  complicate  the  acquisition.  In  instances  where  the  TOP  cannot 
stand  alone  as  a  competitive  instrument,  other  methods  may  be  called  upon  to 
supplement  the  description.  Leader/Follower  may  assure'the  successful  transfer 
of  technology  in  the  event  of  "know-how"  problems.  Licensing  can  be  used  to 
counter  the  legal  complications  of  proprietary  data. 

2 .  Form,  Fit,  and  Function  (pj.). 

a.  Definition. 

The  Form,  Fit  and  Function  (F^)  method  is  the  description  of  military 
equipment  by  performance  characteristics.  The  equipment  is  described  in  terms 
of  output,  function  and  operation.  External  configuration,  mounting  provisions 
or  interface  requirements  may  be  included.  Blit  details  of  design,  fabrication 
and  internal  structure  are  normally  left  to  *ue  option  of  the  contractor.  F? 
is  the  classic  "black  box"  concept  where  it  is  not  necessary  to  define  the 
internal  workings  of  the  products.  The  method  is  also  referred  to  as  the 
"freedom  of  design"  alternative. 

b.  Advantages. 

(1)  Increased  competition  can  be  expected.  Since  a  variety  of 
technical  approaches  may  result  in  a  product  giving  the  desired  function,  it  is 
certainly  probable  that  more  potential  sources  are  avai lable.  It  is  also  likely 
that  the  increased  competition  will  mean  lower  prices. 

(2)  The  F^  description  encourages  innovation  and  ingenuity.  Pri¬ 
vate  industry  is  not  constrained  by  Government  designs.  Contractors  are  given 
extensive  design  latitude  and  are  expected  to  provide  new  approaches  and  con- 


(3)  The  responsibility  for  meeting  performance  is  placed  squarely 
upon  the  contractor.  Responsibility  for  adequate  design  is  vested  in  the 
contractor.  The  Government  is  able  to  get  out  from  under  the  doctrine  of 
implied  warranty  which  is  associated  with  design  descriptions.  The  doctrine 
states  that  "if  the  (design)  specifications  are  followed,  a  satisfactory  product 
will  result."  In  other  words,  the  burden  of  performance  is  upon  the  Government 
if  the  contractor  adheres  to  the  design  requirements. 

(4)  The  problem  of  procuring  or  maintaining  a  Technical  Data 
Package  is  removed  from  the  Government.  Technical  data  is  expensive;  configura¬ 
tion  control  is  troublesome  and  costly. 

c.  Disadvantages. 

(1)  The  overriding  disadvantage  of  the  description  relates  to 
logistic  impl ications .  The  likelihood  is  that,  over  time,  a  number  of  different 
items  will  be  purchased,  all  of  which  conform  to  the  functional  description. 
Yet  they  will  not  be  alike  internally.  Standardization  and  interchangeabi 1 ity 
will  be  adversely  affected.  The  number  of  repair  parts  for  stockage  will 
increase.  Operational  and  maintenance  training  will  be  required  for  each  item 
of  equipment.  The  problems  are  magnified  for  maintenance  and  supply  personnel 
in  field  units  who  are  required  to  support  equipment  under  already  less  than 
ideal  conditions. 

(2)  It  is  alleged  that  the  performance  specification  is  more  apt 
to  encourage  the  marginal  producer  to  bid  lower  than  he  would  were  a  design 
package  required.  The  low  bidder  may  not  appreciate  the  engineering  effort 
required  to  meet  stringent  performance  requirements.  To  counter  this  threat 
the  Government  must  place  greater  reliance  on  source  selection  criteria.  T'ie 


7 


I'Ll' 


criteria  must  be  carefully  constructed  to  i»'tlude  the  means  to  evaluate  contrac¬ 
tor  awareness  of  critical  elements  as  w^'l  as  the  capability  to  produce  the 


i  tem . 


(3)  Performance  specifications  place  more  emphasis  upon  testing. 


Qualification  (first  article)  testing  Will  be  essential  since  one  may  be  dealing 
with  an  unproven  design.  Initially,  the  added  requirement  for  testing  may  not 
appear  to  be  a  disadvantage.  However,  it  must  be  remembered  that  structuring 
tests  requires  creativity.  In  addition,  it  is  possible  that  test  equipment 
must  be  built.  Finally,  the  test/  may  be  time-consuming  and  costly,  factors 
which  may  be  overlooked  in  a  superficial  analysis  of  the  proper  method  to  be 
used. 

d.  Implications  for  Us^e. 

Normally,  F^  specifications  are  best  used  for  the  acquisition  of 
expendable,  nonreparable  item*  where  systems  performance  is  not  dependent  upon 
internal  configuration  of  exponents.  Commercial  off-the-shelf  and  modified 
commercial  items  especi al  ly  ,^eet  this  definition.  Even  in  circumstances  where 
the  items  are  reparable,  F3  description  can  be  expected  to  be  applicable 

for  commercial  items  beca/se  responsibility  for  repair  and  stockage  of  parts 
can  remain  with  the  supplier.  Typewriters  and  ADP  equipment  are  examples  of 
such  equipment. 

Although  F^  specifications  are  more  appropriate  for  nonreparable 
items,  they  are  also  Used  for  totally  different  types  of  military  equipment; 
e.g.,  generators  and  military  construction  equipment.  Generally,  systems  in 
this  category  are  quasi -commercial  with  a  mix  of  military  and  commercial 
characteristics.  Because  Government  TOP  of  the  design  type  is  not  imposed, 
more  competition  is  achieved  and  industry  retooling  is  not  required.  On  the 
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other  hand,  field  maintenance  support  of  the  equipment  in  this  category  can  be 
a  special  problem  as  described  in  the  F^  disadvantages.  The  difficulties—re- 
pair  part  support  and  maintenance  training— can  possibly  be  alleviated  through 
the  use  of  special  contractual  arrangements.  These  include  warranty  provi¬ 
sions,  renewable  maintenance  contract  provisions,  and  service  contracts  which 
require  the  equipment  manufacturer  to  support  the  equipment  throughout  its 
operating  life.  Multiyear  contracts  would  tend  to  standardize  the  items  being 
purchased  over  a  longer  period  of  time. 

3.  Leader/Follower  (L/F). 

a.  Definition. 

The  leader/ fol lower  (L/F)  method  is  an  acquisition  technique  under 
which  the  developer  or  other  producer  of  an  item  or  system  (the  leader  company) 
furnishes  manufacturing  assistance  and  know-how  or  otherwise  enables  a  follower 
company  to  become  a  source  of  supply  for  the  item  or  system  (DAR  4-701 ) . 

b.  Procedures. 

Three  procedures  are  available  for  implementing  the  L/F  technique 
(DAR  4-703):  the  Government  contracts  with  the  leader  who  subcontracts  with 
the  follower,  the  Government  contracts  with  both,  and  the  Government  contracts 
with  the  follower  who  subcontracts  with  the  leader  for  assistance. 

(1)  Award  of  a  prime  contract  for  supplies  to  an  established  source 
(leader)  who  is  obligated  to  subcontract  a  part  of  the  quantity  to  a  specified 
or  competitively  selected  subcontractor  (follower).  The  leader  is  also  required 
to  furnish  technical  assistance  to  the  subcontractor  in  producing  the  subcon¬ 
tracted  quantity. 


(2)  Award  of  a  prime  contract  for  a  part  of  the  total  requirements 
for  supplies  to  the  leader  company.  In  turn,  the  prime  contract  also  obligates 
the  leader  company  to  provide  technical  assistance  to  the  follower  who  has  a 
direct  contract  with  the  Government  for  the  remaining  portion  of  the  total 
requi rements. 

c.  Planning  for  L/F. 

Early  planning  for  L/F  not  only  facilitates  later  use  but  also 
provides  lead  time  to  industry  for  its  planning.  Reaching  an  L/F  agreement  in 
principle  with  the  developer  during  the  R&D  phase  is  recommended.  The  agreement 
provides  leverage  and  motivation  with  the  evential  leader.  It  makes  it  clear 
to  all  parties  early  in  the  acquisition  that  production  competition  is  antici¬ 
pated.  The  contractors  cannot  at  a  later  time  accuse  the  Government  of  breach¬ 
ing  faith  or  changing  the  rules. 

d.  L/F  and  the  Technical  Data  Package. 

(1)  The  L/F  method  is  closely  akin  to  the  Technical  Data  Package 
method  of  achieving  competition.  The  L/F  method  presupposes  the  existence  of  a 
TDP  adequate  for  competition.  Whether  or  not  a  validated  TDP  is  a  prerequisite 
is  subject  to  debate.  Delaying  competition  until  the  TDP  is  validated  may 
effectively  prohibit  obtaining  realistic  competition  due  to  an  insufficient 
quantity  of  items  remaining  to  be  produced.  Using  a  TDP  which  is  not  validated 
may  mean  technical  problems  resulting  in  schedule  slippages,  increased  engineer¬ 
ing  changes,  and  concomitant  increases  in  costs.  Certainly  a  validated  TDP  is 
desirable,  but  a  production  TDP  which  has  evolved  from  R&D  may  be  sufficient. 
The  leader  company  is  expected  to  bridge  the  gap  between  the  initial  production 
TDP  and  the  validated  TDP.  The  leader  complements  the  TDP  with  its  knowledge 
of  system  production. 


(?)  Generally,  L/F  is  used  in  conjunction  with  the  TDP  in  the 
following  circumstances: 

(a)  A  system  of  moderate  complexity  has  evolved  from  research 

and  development. 

(b)  The  transfer  of  technology  cannot  be  accomplished  through 
the  TDP  alone;  technical  assistance  is  required  in  order  to  provide  the 
manufacturing  "know-how"  essential  to  the  successful  production  of  the  hardware. 

(c)  The  system  is  essentially  new  with  production  only  by  the 
developer  of  the  system. 

(3)  The  advantages  ascribed  to  L/F  as  opposed  to  using  the  TDP 

alone  are: 

(a)  A  higher  assurace  of  successful  technology  transfer. 

(b)  Accomplishing  production  qualification  at  an  earlier 
date  thereby  increasing  the  opportunity  for  competition. 

(c)  Ability  to  assign  reliability  and  warranty  responsibility. 

(4)  The  major  disadvantage  of  L/F  is  the  large  amount  of  money 
required  to  bring  the  second  source  up  to  performance. 

e.  Industry  Surveys. 

Industry  willingness  to  participate  as  followers  in  a  L/F  acquisi¬ 
tion  is  obviously  essential  to  success.  In  many  instances  project  management 
personnel  or  acquisition  managers  may  be  able  to  make  this  determination 
through  its  knowledge  of  the  firms  with  which  it  does  business.  On  the  other 
hand  it  may  be  necessary  to  conduct  physical  surveys  to  gather  information  on 
selected  potential  bidders.  The  survey  should  lead  to  a  detailed  analysis  of 
the  following: 

(1)  The  desire  of  specific  firms  to  participate  as  followers. 


(?)  The  determination  of  open  capacity  available  for  producing  the 
system  or  component. 

(3)  Special  tooling  and  equipment  required  to  support  quantity  pro¬ 
duction. 

(4)  Acquisition  lead  times  to  obtain  tooling  and  equipment. 

(5)  Costs  associated  with  getting  ready  to  participate  as  follower, 
f.  Implementation  of  L/F  in  the  Army. 

(1)  Applications  of  L/F  in  the  Army  have  resulted  in  significant 
cost  savings.  Real  competition  was  generated;  the  follower  became  a  viable 
competitor  of  the  leader.  An  examination  of  these  successful  programs  noted 
the  following  essential  characteristics. 

(a)  First  year  production  of  the  system  by  the  developer- 
leader,  during  which  time  the  TDP  is  validated. 

(b)  Concurrent  with  the  release  of  the  first  production 
equipment,  a  competition  among  established  producers  for  selection  of  a  second 
source. 

(c)  Award  of  an  educational  buy  (see  next  paragraph)  with 
option  provisions  to  the  follower  to  enable  him  to  become  proficient  in 
manufacturing  the  hardware. 

(d)  Follower  production  of  a  small  quantity  of  items  for 
qualification  testing,  with  technical  assistance  furnished  by  the  leader. 

(e)  Exercise  of  option  by  the  Government  so  that  follower  can 
demonstrate  his  capability  to  achieve  quantity  production.  (Unless  the  leader 
has  the  capability  to  produce  quantities  needed  by  the  Government,  leader/ 
follower  will  not  accomplish  the  purpose  for  which  it  is  intended--competition 
in  the  full  production  phase.) 


(f)  Split  buy  award  between  leader  and  follower  to  build  up 
production  capability  of  follower. 

(g)  Buy-out,  winner  take  all  competition,  for  full  production 

quantities. 

(2)  These  historical  acquisitions  were  conducted  under  relatively 
ideal  conditions--stable  budgets,  large  quantities,  and  short  acquisition 
leadtime.  Today's  conditions  are  different.  To  use  L/F  successfully,  steps 
will  have  to  be  taken  to  compress  the  schedule.  Acquisition  decision  makers 
will  need  to  be  innovative,  finding  shortcuts  without  taking  undue  risks. 

4.  Educational  Buy. 

a.  Definition. 

An  educational  buy  is  a  contract  to  provide  a  firm  the  opportunity 
to  learn  how  to  manufacture  limited  production  quantities  of  a  military  item  of 
equipment  in  accordance  with  a  Government  TDP.  Normally,  the  purpose  of  the 
method  is  to  generate  a  competitive  second  source  for  an  item  which  has  pre¬ 
viously  been  bought  noncompetiti vely.  The  second  source  contractor  is  usually 
selected  as  a  result  of  competition,  although  the  source  can  be  directed  by 
the  Government. 

b.  Advantages  of  the  Educational  Buy. 

(1)  The  educational  buy  can  be  an  excellent  method  of  enhancing 

competition. 

(2)  It  is  likely  to  be  much  less  costly  to  implement  than  L/F, 
1 icensing  or  teaming. 


c.  Disadvantages  of  the  Educational  Buy. 

(1)  The  use  of  the  method  to  develop  a  second  source  is  time 
consuming.  A  realistic  schedule  must  be  provided  to  allow  the  second  source 


time  to  learn  how  to  produce  the  item,  time  for  a  gradual  production  rate  build¬ 
up,  and  time  to  permit  valid  testing. 


(2)  Its  use  may  be  limited,  e.g.,  it  may  not  be  feasible  to  use  the 
method  by  itself  for  second  sourcing  complex  items. 

5.  Directed  Licensing, 
a.  Definition. 

The  directed  licensing  method  is  akin  to  leader/follower  in  that 
the  leader  provides  data  and  assistance  to  help  a  follower  become  a  qualified 
producer.  However,  with  licensing,  not  only  is  assistance  provided  but  the 
developer  (who  may  be  the  leader  or  subcontractor  of  the  leader)  is  selling  or 
renting  something  he  owns  (patents,  trade  secrets,  etc.). 

The  directed  licensing  method  consists  of  the  use  of  a  special 
provision  (1)  as  part  of  a  contract  between  the  Government  and  developer  or  sole 
producer  of  an  item  or  system,  or  (2)  as  a  separate  agreement  between  the 
developer  or  sole  producer  and  another  potential  producer  whereby  the  developer 
or  sole  producer  agrees  to  gant  authoritative  permission  to  another  source  for 
the  production  of  the  item  or  system.  Rand,  who  has  performed  most  of  the 
research  in  licensing,  has  coined  the  following  definition.  "The  directed 
licensing  concept  consists  essentially  of  having  the  Government  obtain  from  a 
weapon  system  developer,  at  the  time  of  issuance  of  the  development  contract,  a 
contractual  commitment  for  rights  to  production  data  and  an  agreement  to  license 
whomever  the  Government  designates  to  produce  the  weapon  system  during  any  or 
all  production  runs,  following  initial  production  by  the  developer.  The 
developer  would  agree  to  provide  a  data  package  and  such  technical  assistance 
as  may  be  required  to  get  the  new  contractor  into  production.  The  development 


contractor  would  be  compensated  for  his  efforts  by  tees  and  royalties  agreed 
upon  at  the  time  of  initial  commitment,"  As  with  other  second  sourcing  methods 
the  objectives  of  licensing  are  twofold,  expanding  the  production  base  and 
enhancing  price  competition. 

b.  Applicability  of  Directed  Licensing. 

Directed  Licensing  has  limited  applicability  for  major  systems  in 
the  Army.  Licensing  is  primarily  applicable  when  the  technical  data  or  patents 
were  generated  by  the  developer  or  sole  source  at  his  own  expense  and  the  rights 
to  that  data  clearly  belong  to  the  developer/contractor.  Most  major  systems  in 
the  Army  have  evolved  through  a  Government- fi nanced  RAD  cycle.  Hence,  the 
Government  owns  the  TOP  and  the  need  to  license  the  systems  does  not  exist. 
But  it  should  be  recognized  that  a  system  is  made  up  of  many  parts.  These 
parts,  major  subsystems  or  components,  may  have  been  developed  with  private 
funds.  Subsystem  or  component  licensing  thus  becomes  a  distinct  possibility 
and  appears  to  offer  the  greatest  hope  as  a  viable  competition  alternative 
within  the  Army. 

6.  Contractor  Team  Arrangements, 
a.  Definition. 

Contractor  team  arrangements  are  described  in  Section  4-117  of  the 
DAR.  The  DAR  recognizes  two  distinctly  different  types  of  teaming: 

(1)  The  prime  contractor  arrangement  where  two  or  more  companies 
form  a  partnership  or  joint  venture  to  act  as  a  potential  prime  contractor. 

(?)  The  prime-subcontractor  arrangement  where  a  potential  prime 


contractor  agrees  with  one  or  more  other  companies  to  act  as  his  subcontractor s) 
under  a  specific  Government  acquisition. 


b.  Applicability 


Teaming  allows  team  members  to  complement  the  unique  capabilities  of 
each  and  to  offer  the  Government  the  best  combination  of  capabilities  to  achieve 
the  system  performance,  cost  and  delivery  desired  for  the  system  being  procured. 
In  the  DOD  the  method  has  been  applied  in  the  following  circumstances: 

(1)  Research  and  Development  (RAD).  Teaming  has  been  primarily 
associated  with  research  and  development  contracts  where  the  combined  expertise 
of  two  or  more  companies  has  been  necessary  to  design  and  engineer  products  to 
meet  complex  military  requi rements . 

(2)  Production  contracts.  The  DAR  acknowledges,  almost  as  an 
afterthought,  that  teaming  might  be  appropriate  for  other  situations,  including 
production  contracts. 

c.  Criteria  for  usage. 

(1)  Moderate  to  high  level  complexity.  In  the  context  of  which 
teaming  is  discussed  in  the  DAR  system  complexity  underlies  its  application. 
It  is  assuned  that  the  development  of  major  defense  systems  might  from  time  to 
time  be  beyond  the  design  capabilities  of  a  single  industrial  concern.  In  such 
circumstances  drawing  together  the  technical  talents  of  two  or  more  companies 
in  some  form  of  legal  teaming  arrangement  is  a  feasible  way  of  assuring  the 
Government's  requirements  can  be  met. 

(2)  Parity  of  subsystem.  Major  systems  are  composed  of  subsystems. 
Teaming,  as  a  competition  technique,  requires  near  equality  among  team  members. 
Therefore,  if  one  subsystem  and  hence  one  team  member  is  dominant,  it  would 
appear  unlikely  that  the  lesser  team  member  would  ever  be  in  a  position  to 
seriously  compete  during  the  production.  One  system  is  composed  of  several 


16 


black  boxes,  all  of  nearly  equal  complexity.  In  this  connection,  it  can  also 
be  concluded  that  the  prime-subcontractor  teaming  arrangement  is  not  preferred 
on  those  teaming  programs  where  production  competition  is  envisioned  between 
team  members.  The  joint  venture  or  partnership  arrangement  is  recommended. 

(3)  Program  stability  and  large  production  quantity.  As  with  any 
major  competition  scheme,  high  volume  and  stability  are  essential.  It  is  even 
more  imperative,  when  two  or  more  major  firms  are  being  asked  to  commit  them¬ 
selves  for  both  the  R&D  and  production  phases  of  the  program. 

(4)  Dollar  ranges  where  competition  can  be  expected  to  result  in 
significant  benefits.  This  primarily  applies  to  unit  costs  of  each  system  to 
be  produced  rather  than  total  program  costs.  When  unit  costs  are  high,  it  can 
be  expected  that  there  will  be  greater  opportunities  for  efficiencies  and 
economies  through  competition. 

(5)  Expectation  that  each  team  member  will  have  the  capability  of 
producing  the  entire  system  at  the  conclusion  of  R&D.  This  means  that  each  has 
the  facilities  and  technical  and  managerial  talents  to  manufacture  the  system 
without  the  assistance  of  the  other  team  member. 

d.  Advantages  of  Teaming. 

(1)  Price  competition  throughout  the  life  of  the  program.  Price 
is  emphasized  during  each  contract  proposal  evaluation  throughout  the  R&D  and 
production  phases.  Of  particular  value  is  the  assurance  of  competition  earlier 
in  the  production  cycle. 

(?)  Acceleration  of  combat  readiness.  The  availability  of  two 
sources  from  the  outset  of  production  insures  higher  production  rates  and  faster 
del i veries. 


17 


(3)  Full  design  data  disclosure.  Team  members  are  required  to 
share  technology;  hence  no  information  concerning  proprietary  processes  or 
techniques  can  be  withheld  from  team  members  of  the  Government.  There  is,  in 
effect,  a  cost-free  sharing  of  technology  and  no  need  to  procure  a  full  unlimited 
technical  data  package. 

(4)  Enlargement  of  the  industrial  base.  The  erosion  of  the  defense 
industrial  base  is  frequently  cited  as  a  major  problem  of  the  U.S.  economy. 
Teaming  results  in  the  creation  of  at  least  two  sources  fully  capable  of 
independently  manufacturing  the  total  system. 

(5)  Enhancement  of  design  competition.  Smaller  contractors  who  do 
not  have  the  in-house  capabilities  to  compete  independently  on  major  acquisi¬ 
tions  may  compete  through  teaming  arrangements. 

7.  Other  Strategies. 

In  addition  to  the  basic  competitive  and  non-competitive  strategies, 
there  are  others  that  may  be  contemplated.  Examples  are  associate  contractors, 
component  breakout,  and  multiyear  contractor.  The  analyst  is  encouraged  to 
consider  these  alternatives  (or  variations  of  those  covered)  on  the  basis  of 
available  literature. 

C.  SELECTION  OF  FEASIBLE  COMPETITIVE  STRATEGIES. 

Based  on  the  criteria  of  this  chapter  the  decision  maker  and/or  analyst 
will  have  to  decide  what  strategies  are  feasible.  These  strategies  will  then 
be  analyzed  in  more  depth  in  the  economic  and  non-economic  chapters  to  follow. 
In  the  CDAP  example,  variations  of  the  TDP  strategy  will  be  analyzed  for 
simplicity  in  the  economic  portion. 
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CHAPTER  III 


ECONOMIC  ANALYSIS 

A.  GENERAL. 

In  the  most  general  sense  the  economic  analysis  deals  with  an  examination 
of  the  overall  cost  associated  with  each  strategy  under  consideration  relative 
to  expected  cost  of  a  sole  source  procurement.  Considered  in  this  analysis  are 
the  non-recurring  costs  of  introducing  a  second  source  and  the  year  by  year 
recurring  costs  associated  with  production  operations.  The  end  objective  is  to 
determine  what  changes  in  the  program  cost  could  be  expected  to  occur  by  adopting 
any  one  of  the  identified  alternatives. 

Estimating  the  individual  elements  of  cost  of  competition  involves  two 
different  approaches.  Non-recurring  costs  tend  to  be  more  directly  identifiable 
and  consequently  lend  themselves  to  a  "bottoms-up"  estimation.  Recurring  cost 
estimating  represents  an  entirely  different  problem.  Generally  they  are  spread 
over  a  long  period  of  time  and  are  subject  to  many  influences.  As  a  result, 
considerably  more  uncertainty  is  inherent  in  estimates  of  recurring  cost. 
Second  sourcing  compounds  the  uncertainty  in  these  estimates.  In  order  to  deal 
with  this  uncertainty  and  to  also  allow  for  possible  influences  of  a  competitive 
procurement  environment,  a  quantitative  model  is  needed  for  use  in  estimating 
the  recurring  cost  portion  of  the  analysis. 

B.  NON-RECURRING  COSTS. 

Mon-recurring  costs  are  those  that  occur  one  time  or  do  not  vary  with 
quantity  and  time.  Mon-recurring  costs  may  be  limited  to  start-up  costs  for  a 
second  source  and  capacity  adjustments  to  meet  future  production  needs.  Host 
costs  include  special  tooling  and  test  equifxnent,  training,  initial  manufactur¬ 
ing  engineering,  technical  data  package  evaluation  costs,  plant  rearrangi  moot 


and  others.  Facilities  and  capital  equipment  may  be  excluded  because,  one,  the 
second  source  RFP  may  not  allow  direct  charge  of  these  items,  and  two,  normal 
accounting  practice  is  to  depreciate  these  items  over  time  and  charge  deprecia¬ 
tion  to  overhead,  a  recurring  cost.  The  analyst  will  have  to  decide  on  the 
inclusion  on  the  individual  case. 

Start-up  costs  consist  of  start-up  capacity  costs  (non-recurring)  and 
initial  production  penalty  costs  (recurring).  Start-up  capacity  costs  can  be 
assessed  directly  by  examining  second  source  budgetary  estimates.  Initial 
production  penalties  are  calculated  by  subtracting  the  expected  sole  source 
price  to  produce  some  expected  quantity  (e.g.,  an  educational  buy)  and  start-up 
capacity  costs  from  estimated  second  source  prices  for  this  quantity.  Uncer¬ 
tainty  intervals  for  prices  should  be  calculated  to  reflect  uncertainty  about 
such  matters  as  the  quality  of  the  TOP  and  about  negotiations  to  be  conducted 
during  second  source  selection. 

In  order  to  understand  both  recurring  and  non-recurring  costs,  one  must 
understand  the  firms'  approaches  to  production.  Each  of  the  firms  has  a  slightly 
different  approach  to  programming  the  production  of  the  system  which  reflects 
its  existing  conditions  and  circumstance.  The  cost  of  capacity  adjustments  for 
various  production  quantities  can  be  calculated  by  evaluating  the  incumbent  and 
prospective  firms'  production  program.  The  analyst  must  anticipate  the  change 
in  vendor  tooling,  plant  rearrangement ,  training,  engineering,  special  test  and 
inspection  equipment,  gauges,  fixtures  and  special  tools  needed  by  the  firm  and 
its  subcontractors  to  meet  any  rate  contemplated  for  the  system.  Further,  the 
additional  plant  and  capital  equipment  additions  for  future  production  rates 


C.  RECURRING  COSTS. 


1 .  General  Approach. 

While  specific  details  of  studies  on  competition  vary,  one  factor  is 
common.  This  factor  is  the  general  relationship  of  individual  unit  cost  to 
quantify  produced.  For  items  in  quantity  production,  the  cost  of  individual 
units  tends  to  decrease  as  the  quantity  produced  increases.  Although  the 
specific  relationship  can  take  a  number  of  different  forms,  the  generally 
accepted  relationship  is  as  follows: 

Unit  Cost  =  (First  Unit  Cost)  X  (Unit  Number)^ 

Where  B  is  a  function  of  the  rate  of  improvement. 

The  given  relationship  says  that  as  the  quantity  produced  doubles,  the  unit 
price  will  be  a  fixed  percentage  less  than  the  unit  price  that  occurred  prior 
to  the  doubling.  For  example,  if  a  90%  improvement  rate  is  being  observed,  the 
cost  of  the  200th  item  will  be  90%  of  the  cost  of  the  100th  item.  This 
relationship  formed  the  core  of  the  cost  model  used  in  this  guide. 

The  given  unit  price  performance  relationship  lends  itself  very  nicely  to 
developing  estimates  of  recurring  cost.  Basically,  there  are  only  two  para¬ 
meters  that  must  be  estimated  in  order  to  project  the  cost  of  any  item  in  a 
given  production  run.  These  parameters  are  the  first  unit  cost  and  the  rate 
at  which  unit  price  improvement  can  be  expected  to  occur.  By  calculating  the 
unit  price  of  each  item  in  the  total  production  run  and  summiny  the  results, 
one  obtains  an  estimate  of  the  total  recurring  cost  associated  with  production 
operati ons . 

While  a  quantity-price  relationship  is  common  to  studies  of  competition  on 
proyram  costs,  the  use  of  this  technique  must  consider  the  specific  program 
being  evaluated.  For  example,  treatment  of  the  expected  unit  price  improvement 
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rate  can  influence  greatly  the  developed  results  and  is  highly  dependent  on  the 

specific  items  being  evaluated.  Adding  to  the  problem  of  complexity  is  the 

/ 

projected  behavior  of  the  individual  unit  price  improvement  relationship  para¬ 
meters  to  the  introduction  of  competition.  It  has  been  claimed  that  increased 
improvement  slopes  occur  after  competition  begins  or  that  downward  shifts  in 
the  unit  price  can  be  expected.  It  is  even  possible  that  combinations  of  the 
preceeding  effects  will  be  observed. 

A  recurring  cost  model  must  be  flexible  enough  to  accommodate  various 
changes  to  price  improvement  parameters.  The  model  must  also  allow  the  total 
production  effort  to  be  broken  down  into  segments  corresponding  to  specific 
contract  awards.  Due  to  the  uncertainty  inherent  in  a  study  of  this  nature, 
specific  parameters  are  treated  appropriately,  the  final  model  can  then  combine 

<hese  features  into  a  process  that  allows  generation  of  recurring  cost  estimates 
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;naving  a  probability  distribution. 

As  was  noted  previously,  the  foundation  of  the  model  used  to  develop 
recurring  cost  estimates  for  this  analysis  is  a  unit  price  vs.  production 
quantity  relationship.  This  relationship  is  often  referred  to  as  unit  learning 
curve  theory.  According  to  this  theory,  total  recurring  cost  can  be  represented 
as  the  sum  of  a  declining  set  of  unit  costs  represented  usually  by  the  following 
function: 

q2 

c  =  l  aqb 

q=qi 

In  this  relationship  a  represents  the  first  unit  cost,  b  is  the  rate  of  cost 
improvements,  and  the  production  quantity  of  interest  extends  from  unit  q^  to 


When  using  the  given  expression  as  a  basis  for  evaluating  possible  effects 
of  introducing  competition  into  an  on-going  program,  several  modifications  to 
the  relationship  are  required.  First,  since  it  is  common  to  have  several 
delivery  years  embedded  within  the  total  production  effort,  it  becomes  important 
to  deal  with  the  time  value  of  money.  Consequently ,  an  appropriate  discount 
rate  needs  to  be  introduced  into  the  expression.  Further,  the  impact  of 
competition  itself  on  the  fundamental  expression  parameters  must  be  accommo¬ 
dated.  A  shift  in  unit  price  from  the  expected  sole  source  values  can  be 
represented  by  an  equivalent  shift  in  the  first  unit  cost.  Similarly,  changes 
in  the  rate  of  price  improvement  can  be  modeled  by  adjusting  the  expression 
exponent  an  appropriate  amount.  As  a  result  the  basic  relationship  becomes  the 
following  for  year  i : 

<li 

c.j  =  aiPi  l  aq(b‘  oi) 

q=qi-i+i 

In  this  revised  expression,  c*^  represents  the  discount  factor  for  year  i,  qi 
represents  the  production  experience  of  a  producer  at  the  end  of  year  i ,  p-j  is 
the  percent  reduction  in  unit  cost  at  year  i  due  to  competition,  and  is  the 
relative  change  in  price  performance  improvement  rate  at  year  i  due  to  competi¬ 
tion.  For  any  given  production  year  any  one  of  the  adjustments  could  be 
applied,  or  it  may  be  assumed  that  no  adjustments  are  necessary  and  the  expres¬ 
sion  reverts  back  to  its  original  form. 

The  actual  adjustments  made  to  the  baseline  expression  in  order  to  describe 
possible  influences  of  competition  have  been  the  source  of  considerable 
discussion.  For  this  reason  adoption  of  the  modified  expression  is  adopted 


here  since  it  can  accommodate  a  price  shift  behavior  and  changes  in  price 
improvement  rate  in  any  combination  for  a  given  production  year.  By  evaluating 
the  given  expression  for  each  program  production  year  and  making  assumptions 
about  the  parameter  changes  upon  the  introduction  of  a  second  source,  it  is 
possible  to  calculate  a  total  alternative  recurring  cost  estimate  in  constant 
dollars  and  discounted  constant  dollars.  This  can  be  done  for  a  number  of 
parameter  combinations.  The  costs  computed  for  a  given  alternative  are  highly 
sensitive  to  the  adjustments  made  to  reflect  competition.  This  observation 
combined  with  the  already  known  uncertainty  inherent  in  the  analysis  require 
additional  steps  to  be  taken  in  developing  recurring  cost  estimates. 

Various  studies  have  suggested  that  one  approach  to  handling  the  uncertainty 
question  is  through  a  computer  simulation  of  the  program  being  studied.  This 
is  especially  valuable  where  several  types  of  production  awards  are  being 
evaluated  within  the  one  program.  For  example,  a  sole  source  period  may  be 
followed  by  a  period  of  split  awards  with  a  concluding  buy  out.  Each  of  these 
phases  in  the  production  effort  could  be  expected  to  create  entirely  different 
influences  on  the  basic  cost  relationship  parameters.  In  consideration  of  the 
variations  of  the  alternatives  being  evaluated  in  this  analysis  and  the  inherent 
level  of  uncertainty,  the  final  recurring  cost  estimating  model  will  be  calcu¬ 
lated  in  the  form  of  simulation. 

In  this  model  the  individual  factors  of  the  basic  cost  relationship  are 
treated  as  a  distribution  of  values  having  minimum,  maximum,  and  most  likely 
magnitudes.  For  example,  the  first  unit  cost  along  with  a  baseline  cost 
improvement  rate  are  given  minimum,  maximum,  and  most  likely  estimates.  The 
actual  range  reflect  the  general  level  of  uncertainty.  In  addition  to  baseline 
parameters  being  given  distribution  estimates,  expected  competition  adjustments 


are  also  treated  In  the  same  manner.  For  the  years  that  competition  is  present, 
anticipated  unit  price  shifts  and  any  price  performance  rate  adjustments  are 
also  treated  in  the  same  manner.  For  the  years  that  competition  is  present, 
anticipated  unit  price  shifts  and  any  price  performance  rate  adjustments  are 
given  minimum,  maximum  and  most  likely  estimates.  By  treating  each  of  these 
parameters  in  this  manner  it  is  possible  to  develop  a  corresponding  cumulative 
probability  distribution  for  each  factor.  The  model  can  then  select  on  a  random 
basis  individual  values  for  each  factor.  The  model  can  then  select  on  a  random 
basis  individual  values  for  each  parameters  of  the  cost  relationship  for  each 
production  year  and  compute  the  associated  recurring  cost.  By  repeating  the 
process  many  times  a  range  of  possible  alternative  costs  is  developed  having  a 
corresponding  probability  distribution.  As  a  result,  it  is  possible  to  discuss 
a  given  alternative  recurring  cost  estimate  in  terms  of  its  most  likely  value 
and  associated  range  of  values. 

Since  one  aspect  of  several  alternatives  is  split  awards  between  two  sources, 
an  influencing  factor  on  the  estimated  program  recurring  cost  is  the  quantity 
awarded  to  each  producer.  Costs  associated  with  each  supplier  are  related  to 
the  number  of  units  produced  which  could  vary  depending  on  how  split  buys  were 
awarded.  Although  it  is  possible  to  treat  split  award  quantities  in  the 
simulation  model,  any  decision  rule  would  be  too  speculative  to  be  valid. 
Consequently,  for  period  within  a  given  alternative  that  are  based  on  split 
awards  between  the  sources,  each  producer  can  be  treated  as  having  equal 
performance  with  equal  quantities.  This  has  the  net  effect  of  reducing  the 
sole  source  quantity  to  half  its  original  magnitude  for  two  suppliers  with  the 
associated  unit  price  not  reaching  as  low  a  value  on  the  price  performance 
curve.  In  order  to  overcome  the  lost  price  performance  that  would  have  been 


achieved  by  the  sole  source  supplier,  some  influence  of  the  competition,  such 
as  a  unit  price  shift,  is  considered  for  introduction  based  on  the  competitive 
circumstances. 

In  dealing  with  unit  price  shifts  within  the  model,  the  point  of  reference 
for  the  given  shifts  is  the  expected  sole  source  unit  price.  This  should  be 
done  for  all  shifts  that  might  be  projected  at  various  points  within  the 
production  cycle.  An  example  of  this  procedure  is  the  alternative  containing 
both  split  buy  and  buy  out  periods.  Unit  price  shifts  are  introduced  at  the 
beginning  of  each  period  and  are  referenced  to  the  original  projected  sole 
source  unit  price  curve.  This  is  illustrated  in  Figure  3-1. 
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One  final  note  regarding  the  model  concerns  treatment  of  monthly  production 
rate  efficiency  relative  to  achieved  unit  cost.  In  addition  to  the  previously 
discussed  influences  on  unit  price,  monthly  production  rate  also  can  have  an 
effect  on  actual  unit  price  values.  If  the  number  of  units  being  produced 
falls  below  the  quantity  required  to  sustain  the  production  resources  at  their 
rate  of  best  efficiency,  a  loss  in  price  improvement  will  occur.  In  evaluating 
the  various  second  source  alternatives,  those  cases  involving  split  award 
periods  represent  possible  loss  of  production  rate  benefits  from  the  sole  source 
supplier  due  to  a  reduced  quantity  being  awarded  to  the  individual  producers. 
The  recurring  cost  model  allows  for  this  situation  by  incorporating  upward  shifts 
in  the  expected  unit  price.  In  Appendix  B  sample  outputs  from  the  model  provide 
displays  of  projected  costs.  A  cumulative  probability  vs.  strategy  cost  is 
given  along  with  the  associated  probability  density.  Individual  production 
year  data  is  also  given. 

2.  Types  of  Recurring  Cost  Inputs. 

It  is  assumed  that  most  sole  source  and  second  source  strategies 
contemplate  paying  for  all  possible  items,  except  Systems  Technical  Support, 
under  a  single  contract  unit  price.  Therefore,  costs  can  be  segregated  into 
contract  prices  for  hardware.  Government  administrative  costs,  other  program 
costs,  and  spillover  effects. 

Contract  Prices  for  hardware  often  include  unit  hardware  cost,  all 
capital  equipment  including  facilities  (assumed  to  be  capitalized  and  depre¬ 
ciated),  tooling  amortized  directly  to  contracts,  sustaining  tooling,  manu¬ 
facturing  engineering,  plant  rearrangment ,  quality  control,  testing,  ECi3 ' s . 
contractor  program  management,  first  destination  transportation  costs,  vendor 
tooling,  correction  of  deficiencies  where  appropriate.  Pre-production  Evalua- 


tion  of  TOP'S,  handling  of  GFE,  and  other  miscellaneous  costs.  Contractor 
General  and  Administrative  expenses,  profit  and  facilities  capital  cost  of 
money  can  also  be  included. 

Government  administrative  costs  can  be  estimated  from  data  supplied  by  the 
system  project  management  office.  They  include:  incremental  PM  administration, 
additional  testing,  contract  administration,  logistics,  maintenance,  and  en¬ 
gineering  government  costs. 

Spillover  effects  to  other  Government  programs  must  also  be  consistent. 
There  may  be  cost  increases  to  other  systems  made  by  the  incumbent  due  to  lower 
volume  lost  to  a  competitor  and  cost  reductions  in  programs  already  being  made 
by  a  new  producer. 

Other  program  costs  potentially  affected  by  a  second  source  program  are 
contractor  systems  technical  support  (e.g.,  ECP  processing),  contract  data 
requirements,  government-furni shed  equipment,  product  improvement  programs,  and 
spares.  These  again  will  have  to  be  assessed  on  a  given  system. 

3.  Data  Sources. 

A  variety  of  sources  must  be  used  to  estimate  the  economic  effects  of 
competition.  Typically  they  will  include  historical  data  for  the  commodity 
class,  historical  competitive  data  from  other  systems,  prior  studies  concerning 
competition  on  the  system,  the  incumbent's  contract  performance  to  date,  second 
source  proposal  cost  data  (if  any),  the  incumbent's  budgetary  cost  estimates, 
and  the  PM's  Baseline  Cost  Estimates. 

4.  Major  Contracting  Factors  Affecting  Recurring  Costs. 

Several  contracting  factors  may  affect  competitive  pressures  for  the 
acquisition.  The  primary  factors  are  considered  to  be  the  timing  of  competition, 
split  buy  guarantees,  and  multi-year  contracting. 


Stable  design  and  program  quantity  remaining  determine  the  optimal  timing 
of  competition.  The  TOP  may  not  be  available  for  competition  until  a  certain 
date.  At  least  a  certain  percent  of  the  program  quantity  must  he  available  for 
a  viable  competitive  strategy.  Split  buy  guarantees  tend  to  reduce  competitive 
pressure.  Multi-year  contracts  should  enhance  competitive  pressures.  The 
effects  of  contract  features,  contract  type,  data  requirements,  solicitation 
type,  capital  equipment  depreciation  methods,  and  the  incumbent  sunk  start-up 
costs  may  be  important. 

S.  Selected  Inout  Distributions. 


The  basic  model  inputs  derived  are  the  sole  source  baseline  (first  unit 
and  curve  slope),  curve  rotations  and  shifts  under  competition,  and  production 
rate  penalties.  Ranges  of  uncertainty  must  be  judgmental ly  assigned,  based  on 
the  program,  the  system,  and  system  empirical  data. 

The  sole  source  strategy  values  can  be  found  from  the  review  of  the 
PM's  Raseline  Cost  Estimate  updates,  the  incumbent's  historical  data  and  con¬ 
tract  negotiations  to  date.  It  is  possible  the  incumbent  firm's  claim  for  its 
learning  curve  slope  will  be  steeper  than  indicated  by  current  data  and  his¬ 
torical  evidence.  If  the  issue  cannot  be  resolved,  the  analyst  may  want  to 
use  two  or  three  sole  source  slopes  to  discern  sensitivity  in  the  results. 

It  is  possible  the  new  firm  may  introduce  some  innovation  or  otherwise 
be  able  to  reduce  cost  at  a  faster  rate  than  the  incumbent.  In  other  words, 
the  firm  may  be  able  to  rotate  its  learning  curve  slope  down  to  give  a  greater 
benefit  of  competition.  In  order  for  a  new  firm  to  have  a  steeper  learning 
curve,  certain  conditions  will  have  to  be  present.  Labor  cost  will  normal  h, 
have  to  be  a  large  part,  of  cost  to  have  an  opportunity  to  improve  learning.  A 


small  "value-added"  by  a  firm  leaves  little  chance  for  a  steeper  stop.  The 


will  have  to  be  an  opportunity  for  the  new  firm  to  operate  more  efficiently;  if 
the  incumbent  is  at  the  state-of-the-art  in  terms  of  production  technology,  it 
is  unlikely  the  new  firm  will  reduce  cost.  Opportunities  for  and  improvements 
are  less  if  there  has  already  been  competition  and  other  cost  reduction  activity 
in  the  program. 

The  most  important  estimate  to  be  made  is  the  one-time  cost  reduction  one 
can  anticipate  from  competition.  Rather  than  a  change  in  slope,  this  is  the 
learning  curve  shift  often  resulting  from  competition.  This  saving  cornes  from 
the  new  firm's  "sharper  pencil,"  a  willingness  by  management  to  accept  lower 
margin,  absorb  more  cost,  or  to  take  some  other  discretionary  action.  Careful 
judgment  comes  to  play  here.  One  must  consider  the  current  cost  structure  and 
level  of  cost  in  the  current  program  and  a  new  firm's  opportunity  to  offer  a 
lower  price.  To  help  in  this  judgment,  it  is  important  to  consider  what  others 
have  done  under  competition.  The  most  appropriate  data  base  is  the  competition 
savings  from  similar  commodities  or  from  the  firms  of  interest.  Next  in  use 
would  he  the  savings  data  from  other  commodity  competition. 

Normally  one  can  assuiie  a  U-shaped  production  rate  curve  (cost  vs.  production 
rate)  for  a  given  plant  structure,  but  it  is  possible  a  curve  may  have  to  be 
derived  for  peculiar  set-ups.  In  any  event  the  analyst  should  attempt  to  derive 
rate  penalities  from  the  incumbent  and  interested  firms  for  the  quantity  schedule 
anticipated. 

After  making  judgments  on  learning  curve  rotations  and  shifts,  production 
rate  effects,  and  the  uncertainty  in  these  judgments  for  each  strategy  (e.g., 
multi-year  TOP  "buy-out"  or  single  year  TDP  split-buy),  the  analyst  can  start 
to  initiate  the  cost  calculations.  At  this  point  he  or  she  will  have  to  decide 
on  the  discount  rates  to  be  employed.  Two  recommended  values  are  0%  and  10% 
(from  Army  economic  analysis  doctrine). 


The  analyst  should  also  educate  decision  makers  on  the  kind  of  dollars  to 
be  used  in  the  analysis.  It  should  be  stressed  that  discounted  constant  (i.e., 
based  on  a  given  year  inflation  rate)  dollars  are  the  fairest  most  objective 
basis  for  comparison  of  complex  competitive  strategies.  The  analyst  may  have 
to  additionally  do  the  comparison  on  other  bases  (e.g.,  escalated  dollars)  for 
other  usage  (e.g.,  budgeting  implications). 


CHAPTER  IV 


NON-ECONOMIC  ANALYSIS 

A.  GENERAL. 

The  non-economic  issues  that  may  represent  risks  or  benefits  in  the 
introduction  of  competition  have  to  be  considered  along  with  the  cost  effects. 
Because  there  are  so  many  non-cost  impacts,  the  analyst  must  develop  a  conceptual 
framework  to  assist  in  isolating  only  those  issues  significant  to  the  immediate 
competition  for  examination. 

A  primary  concept  for  determining  the  scope  of  the  analysis  is  to  examine 
only  those  issues  that  are  truly  determinant  to  the  competition  decision.  Thus 
a  certain  issue,  such  as  downstream  configuration  changes,  may  be  important  to 
the  system  development,  but  it  may  be  irrelevant  for  competition  alternatives. 
Note  also  that  competitive  alternative  evaluations  are  only  meaningful  when 
compared  to  alternatives  such  as  a  non-competitive  baseline  evaluation. 

Another  basic  rule  is  to  group  issues  by  objectives  of  the  acquisition. 
Minimization  of  cost  is  a  main  objective  and  is,  of  course,  the  concern  of  much 
of  a  typical  analysis.  The  primary  non-cost  objectives  of  an  acquisition  are 
to  maintain  the  develiery  schedule  and  meet  the  technical  requirements  for  the 
system.  In  addition,  on  a  given  program  the  PMO  may  be  interested  in  other 
objectives  such  as  meeting  mobilization  plans,  meeting  RSI  and  other  foreign 
commitments,  maintaining  good  acquisition  management,  and  satisfying  higher 
headquarter  objectives.  This  chapter  will  discuss  these  objectives  in  terms  of 
both  the  risk  that  they  may  not  be  satisfactorily  accomplished  and  their 
potential  enhancement  because  of  competition. 

It  is  always  a  good  idea  to  use  as  much  quantitative  information  as  possible, 
but  not  to  shrink  from  statements  of  expert  judgment  on  the  issues.  It  goes 


without  saying  that  the  analyst  must  gather  every  piece  of  information  possible, 
particularly  when  more  qualitative  analysis  is  performed. 

To  roll  up  the  overall  assessment  of  an  issue,  an  analyst  might  assign  some 
sort  of  relative  rating  such  as  low,  medium,  or  high  risk. 

Because  there  are  powerful  constituencies  on  both  sides  of  the  competition 
decision,  the  analysis  will  undergo  a  considerable  amount  of  scrutiny.  This 
scrutiny  will  fall  heavily  on  the  non-economic  side  of  the  analysis  because  of 
the  large  degree  of  judgment.  This  behooves  the  analyst  to  insure  the  analysis 
is  all-inclusive,  that  all  information  is  obtained,  and  that  judgments  are 
corroborated.  The  difficulty  in  accomplishing  these  tasks  depends  on  whether 
the  analyst  has  any  concrete  indications  that  the  prospective  firms  can  make 
the  system.  Such  information  can  vary  from  an  actual  proposal,  which  would 
lend  great  credibility  to  judgments,  to  no  information  on  the  firms,  which 
would  lead  to  weaker  judgments. 

The  remainder  of  the  chapter  deals  with  treatement  of  individual  issues. 
B.  SCHEDULE  RISK. 

Since  this  guidance  involves  production  competition  probably  over  a  number 
of  contracts  with  a  number  of  important  dates,  the  analyst  will  have  to  find 
from  the  decision  maker  what  schedules  to  pursue. 

The  most  important  is,  of  course,  hardware  delivery.  Research  has  shown 
that  a  new  source  will  typically  suffer  an  unanticipated  slippage  in  delivery. 
This  will,  therefore,  be  a  determinant  factor  in  most  analyses.  The  risk  of 
hardware  slippage  is  a  function  of  the  complexity  of  the  system,  the  producibi- 
lity  of  the  system,  the  condition  of  the  specifications  of  the  system,  the 
capabilities  of  the  prospective  firms,  the  capabilities  of  the  government 
office,  the  resources  of  that  office,  and  a  number  of  external  factors. 


A  primary  source  of  risk  is  the  inherent  complexity  of  the  system  and  its 
state  of  development.  That  is,  a  new  firm  may  have  difficulty  in  replicating 
state-of-the-art  desiyns  and,  if  the  production  of  the  system  is  still  experi¬ 
encing  change,  difficulty  in  tracking  the  configuration  of  the  design.  Beyond 
the  design,  there  may  be  a  problem  if  the  producibility  of  the  system  is  parti¬ 
cularly  troublesome  or  much  of  the  production  process  is  not  included  in  the 
technical  data  package  (TOP). 

It  is  imperative  that  the  technical  data  package  be  validated;  that  is,  the 
new  firm  should  have  assurance  that  following  the  TOP  will  produce  an  exact 
operational  replica  of  the  system  being  produced  by  the  incumbent  firm.  At 
least  five  criteria  should  be  considered  in  deciding  the  level  of  production 
readiness,  i.e.,  of  validation,  of  the  TOP: 

1.  Successful  completion  of  initial  production  test  (IPT) 

2.  Completion  of  physical  configuration  audit  (PCA) 

3.  determination  that  hardware  design  is  stable 

4.  Production  of  system  on  "hard"  tooling 

5.  TOP  conformance  to  level  3  (form  1)  requirements  of  D0D-D-1000B. 
One  should  not  underestimate  the  rippling  effect  of  difficulty  resulting  front  a 
TDP  with  even  a  few  flaws.  One  phenomenon  that  is  quite  possible  in  contempla¬ 
ting  competition  is  that  the  incimbent  contractor  may  become  slow  in  delivering 
the  TOP.  The  Project  Management  Office  (PMO)  must  be  alert  to  this  occurrence 
and  monitor  the  progress  of  TOP  development  and  logistics.  Moreover,  a  consid¬ 
erable  amount  of  proprietary  data  can  require  new  design  and  thus  lead  to 
schedule  disruption. 

The  technical,  financial,  and  managerial  capability  of  the  prospective 
firms  must  be  considered  in  assessing  schedule  risk.  This  kind  of  assessment 


is  beyond  the  responsibility  determination  ot  a  pi  ^-award  survey.  The  analyst 
must  decide  whether  the  prospective  firms  have  the  ability  to  handle  the  specific 
requirements  of  the  given  system  at  a  given  production  rate  over  its  entire 
life  cycle.  In  the  absence  of  relevant  experience  on  the  system,  probably  the 
most  difficult  assessment  is  the  ability  to  manufacture  the  hardware.  Particu¬ 
larly  important  is  the  availability  of  facilities  and  machine  tools,  experience 
of  production  personnel,  and  vendor  structure.  It  may  take  an  unacceptable 
amount  of  time  to  prepare  for  production. 

The  government  has  to  also  face  its  own  abilities  to  be  able  to  support  a 
competitive  strategy.  The  PMO  staff  must  have  the  necessary  inhouse  skills  and 
resources  to  design  the  strategy  and  then  execute  it,  or  be  able  to  obtain  them. 

Many  other  factors  can,  of  course,  introduce  risk  to  the  delivery  schedule. 
For  example,  the  new  firm  can  experience  a  strike  or  its  plant  can  burn  down; 
or  government  requirements  can  be  expanded.  Guidance  for  these  isolated  events 
is  too  broad,  however,  to  be  useful. 

C.  PERFORMANCE  OR  RELIABILITY  RISK. 

Virtually  the  same  list  of  factors  that  affect  schedule  risk  affect 
performance  risk.  Limited  research  results  suggest  that  product  quality  can  be 
maintained  from  new  sources  if  testing  is  adequate.  The  biggest  cause  for 
concern  is  the  production  capability  of  the  prospective  firms.  The  best 
technical  expertise  of  the  government  must  be  brought  in  to  consult  on  this 
critical  question. 

D.  OTHER  RISKS. 

As  mentioned  earlier  each  system  has  its  own  list  of  other  objectives  that 


are  at  risk  under  a  competitive  strategy. 


Mobilization  readiness  is  a  major  objective  for  many  PMO's.  Competition 
can  enhance  or  degrade  mobilization  capability.  One  part  of  the  basic  competi¬ 
tive  analysis  is  finding  whether  the  prospective  firms'  can  meet  the  basic 
production  rates  of  the  contract.  Beyond  this  analysis,  the  PMO  must  ascertain 
that  these  firms  can  achieve  the  extreme  mobilization  rates  and  find  if  they 
can  produce  any  cheaper  or  faster  than  can  the  incumbent.  Another  important 
criterion  is  whether  having  a  new  source  will  assure  greater  surge  capability 
by  virtue  of  introducing  a  labor  supply  (and  reducing  risk  of  a  strike  with 
the  incumbent  holding  up  production),  introducing  a  corporate  entity  (and 
reducing  risk  from  incumbent  technical  or  business  failure),  and  geographical 
dispersion  (and  reducing  risk  from  catastrophe). 

It  is  entirely  possible  the  PMO  will  have  an  agreement  with  some  other 
organization  that  might  be  jeopardized  by  competition.  One  example  is  a 
Memorandum  of  Understanding  (MOU)  with  another  country  for  the  future  production 
of  the  system  by  a  foreign  producer.  In  this  case  a  form,  fit,  and  function 
competition  might  violate  the  conditions  of  the  MOU.  Similarly,  all  agreements 
with  other  PMO's  on  some  integrated  acquisition  or  logistical  effort  must  be 
scrutinized. 

Improved  acquisition  management  may  be  an  explicit  goal  for  competition  in 
some  programs.  This  is  another  issue  that  competition  could  affect  positively 
or  negatively.  If  the  incumbent  contractor  has  not  been  cooperative  with  the 
PMO  and  the  new  firms  are  truly  viable  sources,  it  is  likely  competition  will 
make  acquisition  management  with  the  incumbent  more  successful.  On  the  other 
hand,  the  evidence  shows  the  PMO  will  have  more  administrative  workload  when 
two  concurrent  sources  have  to  be  supported.  If  the  strategy  leads  back  to  one 
source,  the  manpower  problem  is  resolved. 


There  are  opportuni ties  for  other  benefits.  Genuine  competition  can  greatly 
increase  the  leverage  the  PMO  has  over  the  incumbent  and  improve  contractual 
cooperation.  A  new  firm  may  introduce  new  vendors  who  may  deliver  better 
performance  and  provide  an  enhanced  industrial  base.  As  discussed  earlier  a 
new  source  may  help  meet  mobilization  objectives.  Additional  non-economic 
benefits  will  have  to  be  assessed  on  a  case-by-case  basis. 
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CDAP  COMPUTER  PROGRAM  DESCRIPTION 


A.  INTRODUCTION. 

The  CDAP  computer  program  has  been  designed  to  calculate  estimates  of 
recurring  costs  associated  with  two  producers  involved  in  a  competitive  unit 
production  effort.  The  concepts  employed  in  this  program  are  those  described 
in  Chapter  III  of  this  pamphlet.  Unit  price  improvement  curves  combined  with 
Monte  Carlo  simulation  form  the  model  foundation.  The  computer  program  also 
incorporates  functions  to  make  its  operation  interactive  and  useable  for  any 
nunber  of  evaluation  data  sets.  The  basic  program  output  provides  an  estimate 
of  the  total  program  recurring  cost  that  can  be  displayed  in  discounted  dollars 
as  well  as  constant  base  year  dollaars.  For  multiple  production  periods,  the 
cost  of  each  period  is  given  for  each  producer  along  with  an  aggregate  lot 
cost.  The  program  will  also  determine  which  of  the  two  producers  is  most  likely 
to  win  a  split  buy  award  and  will  display  the  relative  win  percentage  if  this 
feature  is  selected.  Finally,  options  also  allow  a  cumulative  probability 
versus  total  program  recurring  cost  and  probability  density  plots  to  be  dis- 
pl ayed . 

The  program  has  been  divided  into  three  basic  operational  modes;  data  file 
create,  data  file  modification,  and  program  execution.  Each  of  these  modes  are 
described  in  the  sections  which  follow,  and  example  data  files  are  given.  An 
example  session  for  each  mode  is  also  provided. 

B.  DATA  FILE  CREATE  MODE. 

This  program  mode  allows  data  files  to  be  created  interactively  by  following 
prompts  given  at  the  user's  terminal.  The  following  information  is  requested. 

1.  Desired  file  name 

2.  File  identification  (for  example  specific  conditions  being  evaluated) 

3.  Nunber  of  production  lots  to  be  evaluated 

4.  First  unit  cost  for  prime  producer  (minimum,  expected,  maximum) 

5.  First  unit  cost  for  the  second  source  (minimum,  expected,  maximum) 

6.  Prime  producer  performance  curve  slope  (optimistic,  expected,  maximum) 

7.  Second  source  performance  curve  slope  (optimistic,  expected,  maximum) 

8.  Individual  lot  data 

a.  Major  split  quantity 

b.  Minor  split  quantity 


c.  Prime  producer  competition  shift  percentage  (pessimistic,  expected, 

optimi st i c) 

d.  Second  source  competition  shift  percentage  (pessimistic,  expected, 

optimi Stic) 

e.  Prime  producer  curve  competition  rotation  (pessimistic,  expected, 

optimi stic) 

f.  Second  source  curve  competition  rotation  (pessimistic,  expected, 

optimi stic) 

Several  notes  are  important  while  using  the  file  create  mode.  When  a 
proposed  file  name  is  entered,  its  existence  is  checked  to  determine  if  another 
file  with  the  entered  name  already  exists.  If  the  name  does  not  already  exist 
it  is  accepted  for  use  with  the  file  being  created.  Should  the  name  be  found 
to  already  exist  in  the  user's  directory,  the  program  will  ask  for  another 
name.  This  is  done  to  prevent  over  writing  an  existing  file.  A  number  of 
input  parameters  require  three  values  to  be  entered.  If  conditions  do  not 
warrant  a  range  of  values  to  be  utilized,  the  same  value  for  each  of  the  three 
entries  is  entered.  Input  values  for  competition  shifts  are  entered  as  decimal 
percentages,  i.e.,  a  5  percent  shift  is  entered  in  its  complement  form  of  .95. 
These  values  may  be  positive  to  indicate  a  downward  shift  or  negative  to  suggest 
an  upward  shift  in  the  price  improvement  curve.  Values  entered  for  improvement 
surve  shifts  should  take  into  consideration  the  effect  of  production  rate.  If 
for  a  given  period  production  rate  will  cause  a  unit  price  change,  that 
relationship  can  be  incorporated  in  the  estimated  shift  parameter.  For  example, 
introduction  of  competition  using  a  split  buy  might  be  assumed  to  cause  the 
prime  producer  to  lower  his  unit  price  by  12  percent.  However,  due  to  the 
split  buy  his  quantity  is  reduced  causing  production  rate  to  fall  off.  The 
composite  shift  might  then  be  asstmed  to  be  only  8  percent  due  to  production 
rate  efficiency  loss.  Actual  entry  of  the  resulting  8  percent  downward  shift 
would  be  in  the  form  of  .92.  Entry  of  performance  curve  rotation  values  is 

based  on  slope  percentage  points.  If,  for  example,  the  basic  curve  slope  had 

been  entered  as  .93  and  is  expected  to  reach  a  value  of  .91  after  competition, 
the  rotation  entry  would  be  .02  to  indicate  a  downward  rotation.  Upward 
rotations  may  be  indicated  by  using  negative  input  values. 

In  addition  to  the  preceding  notes,  special  mention  needs  to  be  made 
regarding  the  individual  production  lot  split  quantities.  If  it  is  desired  to 
establish  a  sole  source  producer  baseline,  all  lot  quantity  is  entered  in  the 
major  split  value.  The  output  will  then  only  reflect  results  for  the  prime 
producer  under  sole  source  conditions.  One  feature  of  the  program  is  computation 
of  lot  costs  for  split  buy  awards  based  on  a  major/minor  quantity  award  to  each 
producer.  For  a  given  cycle  of  the  simulation  the  program  awards  the  major 

split  quantity  to  the  producer  having  the  lowest  unit  price  prior  to  the  given 

lot  (adjusted  for  any  shifts).  This  approach  to  dealing  with  split  awards  may 
not  he  appropriate  in  all  cases.  Consequently,  an  alternate  method  is  available 
within  the  program  to  handle  split  buys.  This  second  source  will  behave  in 
excactly  the  same  manner  and  the  total  lot  is  evenly  split  between  them.  This 
latter  method  will  then  produce  equal  lot  costs  for  each  producer.  Implementa- 


tion  of  these  alternative  treatements  of  split  buy  awards  is  determined  by  the 
values  entered  for  major  and  minor  split  quantities.  If  different  values  are 
entered  the  split  award  approach  is  used.  Entry  of  equal  values  will  invoke 
the  composite  performance  approach. 

One  final  note  regarding  the  data  file  create  mode  is  the  stored  data 
format.  To  maximize  ease  of  data  review,  appropriate  headings  are  stored  along 
with  the  data  entries.  Even  though  a  file  modification  mode  is  available,  if 
numerous  data  sets  are  being  evaluated  by  having  appropriate  headings  in  the 
file  it  is  possible  to  quickly  review  individual  file  contents  for  accuracy. 

C.  FILE  MODIFY  MODE. 

Changes  to  existing  data  files  can  be  easily  made  using  the  modify  mode. 
When  this  mode  is  entered  the  name  of  the  data  file  to  be  modified  is  requested. 
All  information  in  the  file  is  then  displayed  along  with  a  reference  number. 
Entry  of  the  appropriate  reference  number  cause  the  data  entry  prompt  for  the 
affected  element  to  be  displayed. 

While  in  this  mode  it  is  possible  to  extend  the  number  of  lots  to  be 
evaluated  by  simply  changing  the  entry  for  number  of  lots.  When  that  value  is 
increased  the  program  will  automatically  display  the  lot  data  prompts  for  the 
new  lot  or  lots.  It  should  also  be  noted  that  if  one  entry  for  a  given  lot  is 
to  be  modified,  all  data  entry  prompts  for  that  lot  will  be  given.  The  data 
elements  that  remain  unchanged  are  simply  reentered. 

D.  PROGRAM  EXECUTION  MODE. 

When  the  program  execution  mode  is  entered  a  series  of  preliminary  prompts 
are  displayed.  The  name  of  the  appropriate  data  file  is  requested  and  checked 
for  its  existence.  If  the  file  is  found  to  exist  the  program  will  continue, 
otherwise  the  input  file  name  prompt  will  be  redisplayed.  Once  the  proper  data 
file  has  been  estblished  the  user  is  asked  if  a  cimulative  probability  density 
plot  will  be  desired.  Basic  program  output  consists  of  a  presentation  of  the 
total  average  cost  along  with  individual  lot  average  costs.  Basic  output  also 
displays  the  individual  input  parameters  derived  from  the  specified  file. 
Presentation  of  the  probability  plots  was  made  optional  to  minimize  printing 
time  if  that  information  is  not  actually  needed  for  a  given  analysis.  The  next 
run  mode  input  parameter  is  the  desired  number  of  simulation  cycles.  Selection 
of  a  value  for  this  parameter  should  consider  several  factors.  A  large  number 
(5000  is  the  maximum  allowed)  will  give  better  assurance  that  the  simulation 
results  will  predict  the  true  range  of  possible  outcomes.  A  large  run  cycle 
value  will  also  give  smoother  probability  curve  plots  when  those  options  are 
selected.  Program  execution  time,  though,  will  increase  substantially  as  the 
number  of  simulation  cycles  becomes  large.  Therefore,  if  many  different  runs 
are  to  be  made  it  is  desirable  to  reduce  the  cycle  count.  A  good  starting 
figure  is  500  cycles.  Using  non-parametric  statistical  methods,  it  is  possible 
to  show  that  at  least  500  cycles  will  generate  99  percent  of  the  total  range  of 
possible  outcomes  at  the  95  percent  confidence  level.  The  last  input  parameter 
that  is  needed  prior  to  actual  program  execution  is  selection  of  discounting. 
If  a  negative  response  is  given  to  the  prompt,  output  results  will  be  in  constant 
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oast*  year  Dollars.  A  positive  response  will  cause  the  program  to  request  the 
lot  ntniber  that  discounting  should  begin.  When  discounting  is  selected  the 
output  will  be  annotated  accordingly.  Discounting  in  this  program  is  based  on 
yearly  midpoints. 

F. .  EXAMPLE  INPUT  DATA  FILES. 

1.  Example  1. 

This  example  sets  up  data  for  a  sole  source  baseline.  The  production 
period  covers  four  years.  Note  that  all  lot  quantities  are  placed  in  the  major 
split  category,  and  that  no  performance  curve  shifts  or  rotations  are  entered. 


IU  :  EXAMPLE  1:  DATA  FILE  FOR  SOLE  SOURCE  BASELINE  4 

PRIME  FIRST  UNIT  COST—  MI N>  80000.  MOST  LIKELY>  100000.  MAX>  127000. 


^  -  —  -  -  w  w  »  m  »  *  wvwv  •  iin  a  /  l  ^  I  \J 

SECOND  SOURCE - M1N>0.  MOST  LIKELY>  0.  MAX>  0. 

PRIME  PCURVE  SLOPE - MIN>0.910  MOST  LIK£LY>0.930  MAX>0.950 

SECOND  SOURCE - MINX). 000  MOST  LIKELY>0 .000  MAX>0.000 


LOT  LOT  QUAN 
// 

MAX  MIN 

1  500.  0. 

2  1000 .  0. 

3  1500.  0. 

4  1500.  0. 


SHIFT  FACTOR 
PRIME 

MIN  M.L.  MAX 
L.00  1.00  I. 00 
1.00  l . 00  l . 00 
1.00  1.00  I. 00 
1.00  1.00  1.00 


SHIFT  FACTOR 
SECOND  SOURCE 
MIN  M.L.  MAX 
1.00  1.00  1.00 
1.00  1.00  1.00 
1.00  1.00  1.00 
1.00  1.00  1.00 


ROTATION  FACT 
PRIME 

MIN  M.L.  MAX 
0.00  0.00  0.00 
0.00  0.00  0.00 
0.00  0.00  0.00 
0.00  0.00  0.00 


ROTATION  FACT 
SECOND  SOURCE 
MIN  M.L.  MAX 
0.00  0.00  0.00 
0.00  0.00  0.00 
0.00  0.00  0.00 
0.00  0.00  0.00 


FIGURE  A-l .  EXAMPLE  1  INPUT  DATA  FILE 


? .  Example  2. 

This  example  sets  up  a  file  for  a  four  year  production  program  where  a 
split  buy  competition  is  introduced  in  the  third  year.  Mote  that  both  shift 
and  rotation  are  introduced  for  the  prime  supplier  in  the  third  year  only,  thus 
indicating  no  further  change  due  to  competition  is  expected.  Also  note  that 
lot  quantities  for  each  source  are  equal  in  years  three  and  four  indicating  a 
composite  price  performance  curve  is  desired. 


ID  :  EXAMPLE  2:  DATA  FILE  FOR  SPLIT  AWARD  COMPETITION  4 

PRIME  FIRST  UNIT  COST— M1N>  80000.  MOST  LIKELY>  100000.  MAX>  127000. 

SECOND  SOURCE - MIN>  60000.  MOST  LIKELY>  85000.  MAX>  110000. 

PRIME  PCURVE  SLOPE - MIN>0.910  MOST  LIKELY>0.930  MAX>0.950 

SECOND  SOURCE - MIN>0.900  MOST  LIKELY>0.030  MAX>0.960 

LOT  LOT  yUAN  SHIFT  FACTOR  SHIFT  FACTOR  ROTATION  FACT  ROTATION  FACT 

if  PRIME  SECOND  SOURCE  PRIME  SECOND  SOURCE 

MAX  MIN  MIN  M.L.  MAX  MIN  M.L.  MAX  MIN  M.L.  MAX  MIN  M.L.  MAX 

1  500.  0.  1.00  1.00  1.00  1.00  1.00  1.00  0.00  0.00  0.00  0.00  0.00  0.00 

2  L 000 .  0.  1.00  1.00  1.00  1.00  1.00  1.00  0.00  0.00  0.00  0.00  0.00  0.00 

3  750.  750.  0.93  0.90  0.88  1.00  1.00  1.00  0.01  0.02  0.03  0.00  0.00  0.00 

4  750.  750.  1.00  1.00  1.00  1.00  1.00  1.00  0.00  0.00  0.00  0.00  0.00  0.00 


FIGURE  A-2.  EXAMPLE  2  INPUT  DATA  FILE 
Example  CDAP  program  output  is  shown  in  Section  H,  CDAP  RUN  SESSION 
EXAMPLE. 
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F.  FILE  CREATE  MODE  EXAMPLE  SESSION. 


r 


OK,  SEG  #SIM2 

ARE  YOU  USING  A  THERMAL  PRINTER  TYPE  TERMINAL  (Y,N) 

N 


THE  FOLLOWING  PROGRAM  MODES  ARE  AVAILABLE  : 

1.  CREATE  A  NEW  DATA  FILE  (C) 

2.  MODIFY  AN  EXISTING  DATA  FILE  (M) 

3.  RUN  USING  AN  EXISTING  DATA  FILE  (R) 

PLEASE  ENTER  THE  LETTER  SHOWN  IN  (  )  THAT  CORRESPONDS  TO  THE  DESIRED  MODE 

C 

WHAT  IS  THE  DATA  FILE  NAME 
TESTFILE 


PLEASE  ENTER  THE  FILE  I.D.  (75  CHARACTERS  MAX) 
EXAMPLE  FILE  CREATE  SESSION 
HOW  MANY  LOTS  ARE  THERE  IN  THIS  DATA  SET  ? 

2 

FIRST  UNIT  COST  FOR  PRIME 
MININUM  : 
l OOOOO 

MOST  LIKELY  : 

120000 
MAXIMUM  : 

170000 

SECOND  SOURCE  FIRST  UNIT  COST 
MINIMUM  : 

90000 

MOST  LIKELY  : 

115000 
MAXIMUM  : 

170000 

PRIME  PERFORMANCE  CURVE  SLOPE  (.XXX) 

MINIMUM  : 

.95 

MOST  LIKELY  : 

.90 

MAXIMUM  : 

.88 

SECOND  SOURCE  PERFORMANCE  CURVE  SLOPE  (.XXX) 
MINIMUM  : 

.95 

MOST  LIKELY  : 

.89 

MAXIMUM  : 

.8b 
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FILE  CREATE  MODE  EXAMPLE  SESSION  C'CONT 1 D) 

DATA  FOR  U)T  #  1 

MAJOR  SPLIT  QUANITY 
>00 

MINOR  SPLIT  QUANITY 
>00 

PRIME  SHIFT  FACTOR  (.XXX) 

MINIMUM  : 

.99 

MOST  LIKELY  : 

95 

MAXIMUM  : 

90 

SECOND  SOURCE  SHIFT  FACTOR  (.XXX) 

MINIMUM  : 

98 

MOST  LIKELY  : 

93 

MAXIMUM  : 

,88 

PRIME  ROTATION  FACTOR  (.XXX) 

MINIMUM  : 

01 

MOST  LIKELY  : 

02 

MAXIMUM  : 

03 

SECOND  SOURCE  ROTATION  FACTOR  (.XXX) 
MINIMUM  : 

01 

MOST  LIKELY  : 

02 

MAXIMUM  : 

,03 

DATA  FOR  LOT  #  2 

MAJOR  SPLIT  QUANITY 
>00 

MINOR  SPLIT  QUANITY 
>50 

PRIME  SHIFT  FACTOR  (.XXX) 

MINIMUM  : 

L  .00 

MOST  LIKELY  : 

L  .00 

MAXIMUM  : 

.00 

SECOND  SOURCE  SHIFT  FACTOR  (.XXX) 
MINIMUM  : 

.00 

MOST  LIKELY  : 

.00 

MAXIMUM  : 


FILE  CREATE  MODE  EXAMPLE  SESSION  (CONT'D) 

PRIME  ROTATION  FACTOR  (.XXX) 

MINIMUM  : 

0 

MOST  LIKELY  : 

0 

MAXIMUM  : 

0 

SECOND  SOURCE  ROTATION  FACTOR  (.XXX) 
MINIMUM  : 

0 

MOST  LIKELY  : 

0 

MAXIMUM  : 

0 

ANOTHER  FILE  (Y,N)  ? 

N 

WOULD  YOU  LIKE  TO  ENTER  ANOTHER  MODE  (Y,N) 
Y 


G.  FILE  MODIFY  EXAMPLE  SESSION. 


THE  FOLLOWING  PROGRAM  MOOES  ARE  AVAILABLE  : 

1.  CREATE  A  NEW  DATA  FILE  (C) 

2.  MODIFY  AN  EXISTING  DATA  FILE  (M) 

3.  RUN  USING  AN  EXISTING  DATA  FILE  (R) 

PLEASE  ENTER  THE  LETTER  SHOWN  IN  (  )  THAT  CORRESPONDS  TO  THE  DESIRED  MODE 
M 

WHAT  IS  THE  NAME  OF  THE  FILE  YOU  WISH  TO  MODIFY 
TESTFILE 


(1)  ID  :  EXAMPLE  FILE  CREATE  SESSION 

(2)  NUMBER  OF  LOTS  :  2 

(3)  PRIME  FIRST  UNIT  COST-MIN>  100000.  MOST  LIKELY>  120000.  MAX>  170000. 

(4)  SECOND  SOURCE - MIN>  90000.  MOST  LIKELY>  115000.  MAX>  170000. 

(5)  PRIME  PCURVE  SLOPE - MIN>0.950  MOST  LIKELY>0.900  MAX>0.880 

(6)  SECOND  SOURCE - MIN>0.950  MOST  LIKELY>0.890  MAX>0.860 

(7) 

LOT  LOT  QUAN  SHIFT  FACTOR  SHIFT  FACTOR  ROTATION  FACT  ROTATION  FACT 
#  PRIME  SECOND  SOURCE  PRIME  SECOND  SOURCE 

MAX  MIN  MIN  M.L.  MAX  MIN  M.L.  MAX  MIN  M.L.  MAX  MIN  M.L.  MAX 

1  600.  300.  0.01  0.02  0.03  0.01  0.02  0.03  0.01  0.02  0.03  0.01  0.02  0.03 

2  900.  450.  1.00  1.00  1.00  1.00  1.00  1.00  0.00  0.00  0.00  0.00  0.00  0.00 


ENTER  THE  NUMBER  IN  THE  (  )  THAT  CORRESPONDS  TO  THE  LINE  YOU  WANT  TO  MODIFY 

7 

WHAT  LOT  NUMBER  DO  YOU  WANT  TO  MODIFY 

1 

DATA  FOR  LOT  #  1 

MAJOR  SPLIT  QUANITY 
600 

MINOR  SPLIT  QUANITY 
300 

PRIME  SHIFT  FACTOR  (.XXX) 

MINIMUM  : 

.98 

MOST  LIKELY  : 

.96 

MAXIMUM  : 

.93 

SECOND  SOURCE  SHIFT  FACTOR  (.XXX) 

MINIMUM  : 

.98 

MOST  LIKELY  : 

.96 
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G •  FILE  modify  EXAMPLE  SESSION  (CONT'D) 


MAXIMUM  : 

.93 

PRIME  ROTATION  FACTOR  (.XXX) 
MINIMUM  : 

0 

MOST  LIKELY  : 

0 

MAXIMUM  : 

0 


SECOND  SOURCE  ROTATION  FACTOR  (.XXX) 
MINIMUM  : 

0 

MOST  LIKELY  : 

0 

MAXIMUM  : 

0.00 


ANY  MORE  CHANGES  (Y ,N)  ? 

N 

WOULD  YOU  LIKE  TO  ENTER  ANOTHER  MODE  (Y ,N) 
N 


H .  CDAP  RUN  SESSION  EXAMPLE . 

OK,  SEC  »S1M2 

ARK  YOU  USING  A  THERMAL  PRINTER  TYPE  TERMINAL  (Y,N) 

N 


THE  FOLLOWING  PROGRAM  MODES  ARE  AVAILABLE  : 

1.  CREATE  A  NEW  DATA  FILE  (C) 

2.  MODIFY  AN  EXISTING  DATA  FILE  (M) 

3.  RUN  USING  AN  EXISTING  DATA  FILE  (R) 

PLEASE  ENTER  THE  LETTER  SHOWN  IN  (  )  THAT  CORRESPONDS  TO  THE  DESIRED  MODE 
K 

WHAT  IS  THE  DATA  FILE  NAME  ? 

BREAKEVEN! 

DO  YOU  WANT  A  CUMULATIVE  PROBABILITY  DISPLAY  (Y,N)  ? 

Y 

DO  YOU  WANT  A  PROBABILITY  DENSITY  DISPLAY  (Y,N)  ? 

Y 

HOW  MANY  SIMULATION  CYCLES  WOULD  YOU  LIRE  (5000  IS  MAX)  ? 

100L 

DO  YOU  WANT  THE  RESULTS  IN  DISCOUNTED  DOLLARS  (Y,N) 

N 
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H.  COAP  RUN  SESSION  EXAMPLE  (CONT'D) 


RUN  —  >  WhU,  Jill.  1)6  1983  Lb:26:20 

ID  :  STRATEGY  3  -  ****  BREAK  EVEN  ****  .93  SOLE  SOURCE  CURVE  SCOPE 


PRIME  SPLIT  WIN 
PERCENTAGE 

LOT  !t  X  LOT 

***** 

***** 

qUANITY 

AVEKAGF  COST  - 

MEDIAN  COST  = 

AVERAGE  LOT 

COST 

205783735  ***** 

205340640  ***** 

AVERAGE  UNIT  COSTS 

PRIME  SECOND  SOURCE  COMPOSITE 

1 

100.00 

too 

0 

0 

0 

0 

100.00 

400 

0 

0 

0 

0 

i 

100.00 

600 

0 

0 

0 

0 

4 

100.00 

600 

2824998 

0 

564999 

4708 

s 

100.00 

829 

129384753 

0 

564998 

156073 

6 

ioo.oo 

1080 

24037652 

22257 

22257 

22257 

/ 

100.00 

1080 

0 

0 

0 

0 

8 

100.00 

1080 

49535857 

45866 

0 

45866 

9 

100.00 

1113 

61 

0 

0 

0 

1  0 

100.00 

1080 

61 

0 

0 

0 

1  1 

100.00 

1080 

61 

0 

0 

0 

12 

100.00 

1080 

61 

0 

0 

0 

13 

100.00 

1080 

61 

0 

0 

0 

14 

100.00 

1080 

61 

0 

0 

0 

1  5 

100.00 

1080 

61 

0 

0 

0 

lb 

100.00 

1080 

61 

0 

0 

0 

TOTAL  NUMBER  OF  UNITS  =  14442 

DATA  USED  IN  RUN - >  WED,  .IUL  06  1983  16:26:20  FROM  FILE  BREAK.EVEN3 

****************************************************************************** 

PRIME  FIRST  UNIT  COST— M1N>  1400000  MOST  LIKELY>  1400000  MAX>  1400000 


SECOND  SOURCE - MIN>  365000  MOST  LIKELY>  565000  MAX>  565000 

PRIME  PCURVE  SLOPE - MIN>  0.870  MOST  LIKELY>  0.870  MAX>  0.870 

SECOND  SOURCE - MIN>  l  .000  MOST  LIKELY>  1.000  MAX>  1.000 


NUMBER  OF  CYCLES— >  1001 

SHIFT  FACTOR  SHIFT  FACTOR  ROTATION  FACT  ROTATION  FACT 
LOT  LOT  qUAN  PRIME  SECOND  SOURCE  PRIME  SECOND  SOURCE 

it  MAX  MIN  MIN  M.L.  MAX  MIN  M.L.  MAX  MIN  M.L.  MAX  MIN  M.L.  MAX 


1  100  O  1.00  1.00  1.00  1.00  1.00  1.00  0.00  0.00  0.00  0.00  0.00  0.00 

2  400  0  1.00  1.00  I. 00  1.00  1.00  1.00  0.00  0.00  0.00  0.00  0.00  0.00 

1  600  0  1.00  1.00  1.00  1.00  1.00  1.00  0.00  0.00  0.00  0.00  0.00  0.00 

4  595  5  1.00  1.00  1.00  1.00  1.00  1.00  -.08  -.06  -.04  0.00  0.00  0.00 

5  600  229  1.00  1.00  1.00  1.00  1.00  1.00  0.00  0.00  0.00  0.00  0.00  0.00 

o  540  540  0.86  0.93  1.00  1.00  1.00  1.00  0.00  0.00  0.00  0.00  0.00  0.00 

1  540  540  1.00  1.00  1.00  1.00  1.00  1.00  0.00  0.00  0.00  0.00  0.00  0.00 

8  1080  0  0.75  0.85  0.95  1.00  1.00  1.00  0.00  0.00  0.00  0.00  0.00  0.00 

9  1113  0  1.00  1.00  1.00  1.00  1.00  1.00  0.00  0.00  0.00  0.00  0.00  0.00 

10  1080  0  1.00  1.00  1.00  1.00  1.00  1.00  0.00  0.00  0.00  0.00  0.00  0.00 
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CDAP  RUN  SESSION  EXAMPLE  (CONT'D). 

RUN  -  >  WEI),  )UL.  06  1983  L  o : 26 : 20 


SHIFT  FACTOR  SHIFT  FACTOR  ROTATION  FACT  ROTATION  FACT 


i.OT 

LOT 

QUAN 

PRIME 

SECOND  SOURCE 

PRIME 

SECOND  SOURCE 

NV 

s.V 

It 

MAX 

MIN 

MIN 

M.L. 

MAX 

MIN 

M.L. 

MAX 

MIN 

M.L. 

MAX 

MIN 

M.L. 

MAX 

l  L 

L08U 

0 

L  .00 

1  .00 

l  .00 

t  .00 

1 .00 

1 .00 

0.00 

0.00 

0.00 

0.00 

0.00 

0.00 

L  2 

1080 

0 

l  .00 

1.00 

1.00 

L  .00 

1.00 

1 .00 

0.00 

0.00 

0.00 

0.00 

0.00 

0.00 

ti 

L080 

0 

1  .00 

1 .00 

l  .00 

1 .00 

1.00 

1.00 

0.00 

0.00 

0.00 

0.00 

o.oo 

0.00 

L  4 

1080 

0 

l  .00 

l  .00 

1.00 

1.00 

1.00 

1.00 

0.00 

0.00 

0.00 

0.00 

0.00 

0.00 

L  5 

1080 

0 

L  .00 

L  .00 

1  .00 

1  .00 

1.00 

1.00 

0.00 

0.00 

0.00 

0.00 

o.oo 

0.00 

Ky 

L  6 

1080 

0 

1  . 00 

1  .00 

1.00 

l  .00 

1.00 

1.00 

0.00 

0.00 

0.00 

0.00 

0.00 

0.00 

$ 

>V 
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ki'N 


->  ULI>,  .10 1.  Oh  198) 


16:26:20 


STKAIKUY  COST 


CUMULATIVE  PROBABILITY 


0.00  O.LO  0.20  0.30  0.40  0.50  0.60  0.70  0.80  0.90  1.00 


l 646  51136  0.0000 
165299424  0.0040 
166996032  0.0060 
I68b92640  *  0.0110 
L  70389248  *  0.0L70 
l 72085856  *  0.0240 
173782464  *  0.0300 
175479072  **  0.0340 
177175680  **  0.0460 
178872288  ***  0.0599 
180568896  ****  0.0759 
182265504  *****  0.0959 
183962112  *****  0.1069 
185658720  ******  0.1249 
187355328  ********  0.1518 
189051936  *********  0.1798 
190748544  **********  0.2078 
192445152  ************  0.2308 
194141760  *************  0.2627 
195838368  ***************  0.2987 
197534976  ****************  0.3287 
199231584  ******************  0.3686 
200928192  *********************  0.4116 
202624800  ***********************  0.4525 
204321408  *************************  0.4935 
206018016  **************************  0.5275 
207714624  ****************************  0.5684 
209411232  ******************************  0.6024 
2U1O7840  ********************************  0.6434 
212804448  **********************************  0.6753 
214501056  ***********************************  0.6973 
216197664  ************************************  0.7263 
217894272  **************************************  0.7572 
219590880  ****************************************  0.7922 
221287488  *****************************************  0.8202 
222984096  ******************************************  0.8472 
224680704  ********************************************  0.8711 
226377312  *********************************************  0.9001 
228073920  **********************************************  0.9201 
229770528  ***********************************************  0.9351 
231467136  ************************************************  0 . 9500 
2  33163744  ************************************************  0.9640 
2  34860352  *************************************************  0.9730 
2  36556960  *************************************************  0.9790 
238253568  *************************************************  0.9840 
2  399501 76  *************************************************  0.9870 


241 646784  **************************************************  0.9920 

243343392  **************************************************  0.9950 

245040000  **************************************************  0.9970 

246736608  **************************************************  o . 9990 

248433216  **************************************************  \  0000 

+ - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 - 1 

0.00  0.10  0.20  0.30  0.40  0.50  0.60  0.70  0.80  0.90  1.00 

STRATKCY  COST  CUMULATIVE  PROBABILITY 


A- 1 5 


■»  !  .\  \  !'  .1.1  1  C.'3T 

0 

I  r>  "i  )  I  I  3b 
l  o  )  2  99  4 1  * 
t  6o99oU  3 2 
l  b8b92 b40 
1  7<;3892  48 
i  7208i83o 
1  73  7824b4 
L  75479072 
1 77 1 75080 
l 78872288 
L 8030889b 
182203304 
L 8 3902 U 2 
1 83b38  7  20 

1  87  353  328 
1 8905 193b 
L 90748544 
1 9244 j l 52 
1 94141 760 
193838368 
197534976 
199231584 
200928192 
202624800 
204321408 
206018016 
207714024 
209411232 
21L10784U 
212804448 
214501056 
216197664 
217894272 
219590880 
221287488 
222984096 
224680704 
226377312 
228073920 
229770528 

2  31467136 
2  33163744 
2  34860  332 
2  36356960 
2  3825)568 
2  199301 76 
241640/84 
24334)392 
245040000 
2  46  7  3b608 
2484)3216 

0 

STRATKCY  COST 


01.  .  0  .  9K)  tb  26:20 


PROBABILITY 

•  o.ol  0.02  0.03  0.04  0.05  0.06  0.07  0.08  0.09  U.10 


O.O'jOO 

A* 

0.0040 

A 

0.0020 

** 

0.0050 

AAA 

0 . 0060 

AAA 

0.0070 

AAA 

0.0060 

A  A 

0.0040 

AAA AAA 

0.0120 

A  A  A  A  A  A  A 

0.0140 

AAAAAAAA 

0.0160 

AAAAAAAAAA 

0.0200 

AA  AA  A 

0.0110 

AAA  AAA AAA 

0.0180 

AAAAAAAAAAAAA 

0.0270 

AAAAAAAAAAAAAA 

0.0280 

AAAAAAAAAAAAA* 

0.0280 

AAAAAAAAAA* 

0.0230 

**************** 

0.0320 

****************** 

0.0360 

*************** 

0.0300 

******************** 

0.0400 

********************* 

0.0430 

******************** 

0.0410 

******************** 

0.0410 

***************** 

0.0340 

******************** 

0.0410 

***************** 

0.0340 

******************** 

0.0410 

**************** 

0.0320 

*********** 

0.0220 

************** 

0.0290 

*************** 

0.0310 

***************** 

0.0350 

************** 

0.0280 

************* 

0.0270 

************ 

0.0240 

************** 

0.0290 

********** 

0.0200 

******* 

0.0150 

******* 

0.0150 

******* 

0.0140 

A  A*  A 

0.0090 

A  A* 

O.OObO 

A* 

0.0050 

A 

0.0030 

A  A 

0.0050 

A 

0.0030 

A 

0.0020 

A 

0.0020 

0.0010 

t- - | - | - | - , - , - , - 1  — -I—*,— “I 

.00  0.01  0.02  0.03  0.04  0.05  0.06  0.07  0.08  0.09  0.10 

PROBABILITY 
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H.  CDAP  RUN  SESSION  EXAMPLE  (CONT'D) 


ANOTHER  RON  (Y,N)  T 

N 

WOULD  YOU  LIKE  TO  ENTER  ANOTHER  MODE  (Y,N) 


MR 

r-/ 


A-l  7 


.■>'  i;  i K 


‘  iK  I  <;  l  NAL  HR  i  ML  COMPUTER  VKKSluN 


May  \')G1 


K  KkwsKkxAtl*Mkkkkk**A*  UHa*************************************************** 

C*  TIM  .  IKOCKAM  SKIS  III-  A  SIMULATION  OF  TWO  PRODUCERS  OPERATING  IN  A  * 
C*  CONI’,  n  I’lVK  KNV I  KONHENT .  THE  PURPOSE  OF  THE  SIMULATION  IS  TO  CALCULATE  * 
C*  THE  COS  T  OF  ACQUIRING  THE  TOTAL  QUANTITY  OF  ITEMS  BEING  PRODUCED  BY  BOTH* 
0*  SOUkGES.  CONSIDERED  IN  THIS  SIMULATION  PROGRAM  ARE  THE  EFFECTS  OF  * 
C*  QUANTITY  PRODUCED  ON  UNIT  PRICE  (PRICE  PERFORMANCE  CURVES,  OR  LEARNING  * 
C*  CURVES),  INFLUENCE  OF  COMPETITION  ON  UNIT  PRICE  UNDER  CONDITIONS  OF  * 
C*  MULTIPLE  CONTRACT  AWARDS,  AND  THE  EFFECT  OF  COMPETITION  ON  RELATIVE  * 
C*  PRODUCTION  EFFICIENCY.  DATA  FOR  THIS  PROGRAM  IS  READ  FROM  A  DATA  FILE  * 
C*  THAT  IS  PREPARED  AND  MAINTAINED  BY  A  UTILITY  WITHIN  THIS  PROGRAM.  * 
C*  * 
c*  IJS  ARMY  TANK  AUTOMOTIVE  COMMAND  * 
C*  COMPUTER  MANAGEMENT  AND  APPLICATIONS  * 
C*  RESEARCH  OFFICE  * 
C*  DRSTA-RY  (MR.  PAUL  BRADLEY)  * 
C*  WARREN,  MICHIGAN  48090  * 


Telephone  AV  786-6228 


(313)-574-6228 


{"  A  *  *  *  *  *  k  **  *  *  A*  ***  **  *  -kick*  *  -kirk  **  *  **  **  *  *  **  A  *  **  *  **  **  **  AAA  **  *  *  **  **  ********  ***  it  *  *  * 


£******************************* 

c* 

C*  VARIABLES  DEFINITION 
C* 

Q  ******************************* 

C  ACL0T(25)  AVERAGE  COST  OF  LOT  N 

C  ALUC(25)  AVERAGE  UNIT  COST  FOR  LOT  N  (COMPOSITE) 

C  AMID  MEDIAN  STRATEGY  COST  FROM  SIMULATION  RESULTS 

C  AP  PRIME  SHIFTED  FIRST  UNIT  COST  AT  LOT  N  AND  A  GIVEN  SIM  CYCLE 

C  APUCL(23)  AVERAGE  UNIT  COST  FOR  THE  PRIME  IN  LOT  N 

C  ASUCL(25)  AVERAGE  UNIT  COST  FOR  THE  SECOND  SOURCE  IN  LOT  N 

C  AS  SS  SHIFTED  FIRST  UNIT  COST  FOR  LOT  N  AND  A  GIVEN  SIM  CYC 

C  AVG  AVERAGE  STRATEGY  COST 

C  BBP  ROTATED  PRIME  SLOPE  AT  LOT  N  AND  A  GIVEN  SIMULATION  CYCLE 

C  BBS  ROTATED  SECOND  SOURCE  SLOPE  AT  LOT  N  AND  A  GIVEN  SIM  CYCLE 

C  BP(3)  PRIME  PERFORMANCE  CURVE  SLOPE  VALUES — MIN,  ML,  MAX 

C  BPT  PRIME  SLOPE  TRIANGULAR  DISTRIBUTION  THRESHOLD  VALUE 

C  BSS(J)  SECOND  SOURCE  PERFORMANCE  CURVE  SLOPE  VALUES — MIN ,  ML,  MAX 

C  BSST  SECOND  SOURCE  SLOPE  TRIANGULAR  DIST  THRESHOLD  VALUE 

C  ClPO)  FIRST  UNIT  COST  FOR  THE  PRIME — MIN,  ML,  MAX 

C  CLPT  PRIME  FIRST  UNIT  COST  TRIANGULAR  DIST  THRESHOLD  VALUE 

C  CISSO)  FIRST  UNIT  COST  FOR  THE  SECOND  SOURCE — MIN ,  ML,  MAX 

C  CISST  SECOND  SOURCE  FIRST  UNIT  COST  TRIANG  DIST  THRESHOLD  VALUE 

C  COST  VARIABLE  USED  TO  PRINT  THE  COST  VALUES  USED  IN  OUTPUT  PLOTS 

C  CUM  SELECTS  PROPER  MODE  FOR  CUM  PROB  DISPLAY(1-CUM ,  0-PDF) 

C  CWP( 23)  PRIME  WIN  PERCENTAGE  FOR  LOT  N 

C  CYCLES  FLOATING  POINT  VERSION  OF  NCYC  (SIMULATION  CYCLES) 


CDAP  SOURCE  LISPING  --  ORIGINAL  PRIME  COMPUTER  VERSION 


Md  y  19SZ 


C  DATE  VARIABLE  USE  TO  RETURN  THE  DATE  FROM  THE  OPERATING  SYS 

C  OH  DISCOUNT  FACTOR  USED  IN  CALCULATING  LOT  COSTS 

C  OtS  SELECTION  PARAMETER  FOR  IMPLEMENTING  DISCOUNTING 

C  D ISC(  2  5)  INDIVIDUAL  DISCOUNT  FACTORS  USING  A  10X  RATE 

C  DP  VALUE  USED  IN  CALCULATING  AVG  UNIT  COST  OF  PRIME  AT  LOT  N 

C  DS  VALUE  USED  IN  CALCULATING  AVG  UNIT  COST  OF  SS  AT  LOT  N 

C  FI  0(35)  FILE  ID  STORAGE  VARIABLE— READ  FROM  THE  DATA  FILE 

C  F  INC  CLASS  INTERVAL  VALUE  FOR  SETTING  UP  THE  OUTPUT  PLOTS 

G  FNAML(lb)  VARIABLE  USED  TO  READ  THE  DATA  FILE  NAME  (16A2) 

C  HOLD  TEMPORARY  VARIABLE  USED  IN  SORTING  THE  SIMULATION  VALUES 

C  ICK  TEMPORARY  VARIABLE  USED  DURING  VALUE  SORTING  AND  TESTS 

C  IDF  LOT  NUMBER  THAT  DISCOUNTING  WILL  BEGIN 

C  IFF  TOP  OF  FORM  PRINT  VARIABLE  FOR  IMPACT  TERMINALS 

C  LVAL  INTEGER  VARIABLE  USED  TO  SCALE  THE  OUTPUT  PLOT  LINES 

C  LINE  DATA  FILE  MODIFICATION  ENTRY  POINT  (‘MODIFY) 

C  LOTN  DATA  FILE  MODIFICATION  LOT  ENTRY  POINT  (*M0D1FY) 

C  Ml  ARGUMENT  OF  SUBROUTINE  ‘CREATE  —  ENTRY  POINT  FROM  ‘MODIFY 

C  M2  ARGUMENT  OF  SUBROUTINE  ‘CREATE  —  BEGINING  LOT  NUMBER 

G  M3  ARGUMENT  OF  SUBROUTINE  ‘CREATE  --  ENDING  LOT  NUMBER 

C  NCYC  NUMBER  OF  SIMULATION  CYCLES  -  INPUT  PRIOR  TO  RUN 

C  NLN  LENGTH  OF  DATA  FILE  NAME  --  RETURNED  FROM  NLEN$A  (SYS  UTILITY) 

C  NLOT  NUMBER  OF  LOTS  READ  FROM  THE  DATA  FILE 

C  NLOTM  MODIFIED  NUMBER  OF  LOTS  FROM  ‘MODIFY 

C  NLOTP  CURRENT  NUMBER  OF  LOTS+1  —  USED  IN  ‘MODIFY 

C  PAVG  PRIME  RUNNING  AVERAGE  UNIT  COST  AT  LOT  N  AND  A  GIVEN  SIM  CYC 

C  PB  PRIME  PERFORMANCE  CURVE  SLOPE  FOR  CYCLE  N  OF  THE  SIMULATION 

C  PC( 50)  CALCULATED  CLASS  INTERVAL  PROBABILITY 

C  PCOST( 50)  CALCULATED  COST  CLASS  INTERVAL  PROBABILITY 

C  PCF  CUMULATIVE  PROBABILITY  DENSITY  DISPLAY  OPTION  (1=»YES,  0«NO) 

C  PDF  PROBABILITY  DENSITY  DISPLAY  OPTION  (O-NO,  1-YES) 

C  PFUC  PRIME  FIRST  UNIT  COST  FOR  CYCLE  N  OF  THE  SIMULATION 

C  PPCOST  PRIME  RUNNING  CUMULATIVE  COST  FOR  A  GIVEN  SIMULATION  CYCLE 

C  PRO l  PRIME  ROTATION  FACTOR  FOR  LOT  N  AND  A  GIVEN  SIMULATION  CYCLE 

C  PSK  PRIME  SHIFT  FACTOR  FOR  LOT  N  AND  A  GIVEN  SIMULATION  CYCLE 

C  PUCOST  PRIME  UNIT  COST  FOR  LAST  ITEM  IN  LOT  N-I  FOR  A  SIM  CYCLE 

C  PV(50)  HISTOGRAM  PLOT  VAR  (DEFINES  PHYSICAL  NUM  OF  PLOT  POINTS) 

C  QIP  LAST  UNIT  NUMBER  FOR  PRIME  AT  LOT  N-l  AND  A  GIVEN  SIM  CYCLE 

C  Q IS  LAST  UNIT  NUMBER  FOR  THE  S  S  AT  LOT  N-l  AND  SIMULATION  CYC 

C  Q2P  LAST  UNIT  NUMBER  FOR  PRIME  A  LOT  N  AND  A  GIVEN  SIM  CYCLE 

C  Q2S  LAST  UNIT  NUM  FOR  SECOND  SOURCE  FOR  LOT  N  AND  GIVEN  SIM  CYC 

C  QM( 2 5 )  MAJOR  SPLIT  QUANITY  FOR  LOT  N 

t  QP  PRIME  LOT  QUANITY  FOR  LOT  N  FOR  A  GIVEN  SIMULATION  CYCLE 

C  QPC  PRIME  CUMULATIVE  QUANITY  FOR  CYCLE  N  OF  THE  SIMULATION 

C  ()S (25)  MINOR  SPLIT  QUANITY  FOR  LOT  N 

C  QSS  SECOND  SOURCE  QUANITY  FOR  LOT  N  FOR  A  GIVEN  SIMULATION  CYCLE 

C  QSSC  SECOND  SOURCE  CUM  QUANITY  FOR  CYCLE  N  OF  THE  SIMULATION 

C  RN  RANDOM  NUMBER  USED  IN  THE  SIMULATION 

C  KOTP( 25 , 3 )  PRIME  SLOPE  ROTATION  FACTOR  FOR  LOT  N  -  MIN,  ML,  MAX 
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c 

<; 

c 

C 

I  i 
(. 
c 
c 
c 
c 
c 


c 

c 

c 

c 

c 

c 

c 

c 


c 

c 

c 

c 


KOI  I’ i 

roissu  - .  ^ 
Ki>i  ss  r 
i .  v  V 1  • 

SilOS  !(  ->U.jO ) 
S  E 

S  bV  (.  J  ')  ,  3  ) 
SH’l' 

slSS(2s  ,  J) 
s  n  ss  r 
sole 

s  S  6 

sscosr 

SSFUC 

ssrot 

SSSF 

sucos r 

TIME 

tck 
r  kuc 

TOTAL 

TTYP 

VAL 

YP 

YS 


PRIME  SLOPE  ROTATION  TRIANGULAR  DIST  THRESHOLD  VALUE 
SECOND  SOURCE  SLOPE  ROTATION  FACTOR  FOR  LOT  N— MIN,  ML.,  MAX 
SECOND  SOURCE  ROTATION  TRIANGULAR  DIST  THRESHOLD  VALUE 
SECOND  SOURCE  RUNNING  AVERAGE  UNIT  COST  AT  LOT  N  AND  SIM  CYC 
STRATEGY  COST  FOR  THE  NTH  SIMULATION  CYCLE 
SCAi.e  FACTOR  USED  IN  SCALE  SUBROUTINE 

PRIME  FIRST  UNIT  COST  SHIFT  FACTOR  FOR  LOT  N— MIN,  ML,  MAX 
PRIME  SHIFT  FACTOR  TRIANGULAR  DISTRIBUTION  THRES  VALUE 
SECOND  SOURCE  FIRST  UNIT  COST  SHIFT  FOR  LOT  N--M1N,  ML,  MAX 
SECOND  SOURCE  SHIFT  FACTOR  TRIANGULAR  D1ST  THRES  VALUE 
SOLE  SOURCE  FIRST  UNIT  COST—  USED  FOR  REFERENCING  SHIFTS 
SECOND  SOURCE  PERFORMANCE  CURVE  SLOPE  FOR  CYCLE  N  OF  THE  SIM 
SECOND  SOURCE  RUNNING  CUMULATIVE  COST  FOR  A  GIVEN  SIM  CYCLE 
SECOND  SOURCE  FIRST  UNIT  COST  FOR  CYCLE  N  OF  THE  SIMULATION 
SECOND  SOURCE  ROTATION  FACT  FOR  LOT  N  AND  A  GIVEN  SIM  CYCLE 
SECOND  SOURCE  SHIFT  FACTOR  FOR  LOT  N  AND  A  GIVEN  SIM  CYCLE 
SECOND  SOURCE  UNIT  COST  FOR  LAST  UNIT  OF  LOT  N-l  AND  SIM  CYC 
VARIABLE  USED  TO  RETURN  TIME  OF  DAY  FROM  THE  OPERATING  SYS 
VARIABLE  USED  TO  INDICATE  TYPE  OF  TERMINAL  BEING  USED 
TEMP  FIRST  UNIT  COST  USED  BETWEEN  LOTS  SPECIFYING  SHIFTS 
VALUE  USED  TO  PRLNT  TOTAL  LOT  QUANITIES 

VARIABLE  USED  TO  INPUT  TERMINAL  TYPE  (IMPACT  OR  THERMAL) 
VARIABLE  USED  TO  PRINT  PROBABILITY  VALUES  IN  OUTPUT  PLOTS 
COST  OF  LOT  N  FOR  THE  PRIME  FOR  A  GIVEN  SIMULATION  CYCLE 
COST  OF  LOT  N  FOR  THE  SS  FOR  A  GIVEN  SIMULATION  CYCLE 


********************  ***************************************************** 


************************** 


C* 

C*  BEG LN  MAIN  PROGRAM 

C 

(J*****  ************  ********* 

$  INSERT  SYSCOM>A$KE YS 

COMMON/  A  /  PV(  5  L ) , PCOS  T( 50 ) ,SC0ST(5000) 

COMMON/  RO  /FID (35) ,  NLOT ,CIP(3),CISS(3),BP(3) ,BSS(3) ,QM(25) , 

+QS (25) ,SFP(25, 3) , SPSS (2 5 ,3) ,ROTP(25,3) ,ROTSS(25,3) ,ACL0T(25), 
+ALUC(25) ,APUCL(25) ,ASUCL(25) ,FNAME(16) ,TIME,DATE(2) 

R EAL*8  PV , PCOS  T , SCOST , F ID , Cl P , CISS , ACLOT , ALUC , BP , BSS , SFP , SFSS , 
-EROTP , ROTSS , SFPT (25) , SFSST( 2 5 ) , ROTPT(25 ) ,ROTSST(25) ,QM,QS ,CWP(25) , 
+AVG , COST , PPCOST , SSCOST , T LME , DATE , PAVG , SAVG , YP , YS , SSFUC , PFUC , 
+ASUCL , APUCL , DLSC( 2  5 ) 

INTEGER  FNAMK.TCK 
LOGICAL  KXST$A 

DA  I A  DISC/  .954  .  .  8o7 ,  .7HB,  .717,  .  652 , .  592  , .  538  ,  .489 ,  .445 ,  .405 , 

+  .  368,  .  334, .  Hi 4 , .276, .251 , .228, .208, .189, .172, .156, .142, .129, 

.+  .  II  /  ,  .  107,  .097/  ,M1  /<)/  ,M?/0/  ,M3/0/ 


B-4 


.i-  K  I.IM  I  v,  -  ORIGINAL  PRIME  COMPUTER  VERSION  -  M,iy  I  9F 


kkkA*.AAk>xkkkkkk*kkkkkkkkkk 


t,A  i,  l  S  PLAY  MKNv’h  OK  KUN  Ml  JDK  !i .  CRKATK  A  NKW  KILE ,  MODIFY  *N  EXISTING  KIK 
AND  KU.  I’rtE  S  1  MIMA  I  I  ON  FROM  AN  EXISTING  K  l  LK  . 

( '* 

(********  kkkkkkkkkkkkkkkkkk 

PR  1  l'  400 

>00  KOKMAT(  'ARE  YOU  USLNO  A  THERMAL  PRINTER  TYPE  TERMINAL  (Y ,  N)  '  ) 
Ki..\D(l  ,505)  TTYP 
SO  5  FORMAT (  Al  ) 

1 F( 1TYP.EQ. IMY )  TCK=0 
t  K(TTYP . NE .  UIY )  TCK=1 
>10  PRINT  520 

3'0  FORMAT ( // IX , 'THE  FOLLOWING  PROGRAM  MODES  ARE  AVAILABLE  :'//5X, 

+'l.  CREATE  A  NEW  DATA  KILE  (C)'//3X,'2.  MODIFY  AN  EXISTING 
+ ' DATA  FILE  (M)'//5X,'3.  RUN  USING  AN  EXISTING  DATA  FILE  (R)'//) 

3)0  PRINT  540 

340  FORMAT( IX, 'PLEASE  ENTER  THE  LETTER  SHOWN  IN  (  )  THAT  CORRESPONDS', 
+  '  TO  THE  DESIRED  MODE'/) 

HEAD(1  ,1250)  ANS 

I F ( ANS . EQ. LHC )  CALL  CREATE(M1 ,M2 ,M3) 

1 F( ANS . EQ. IHM)  CALL  MODIFY 
l F( ANS . EQ • IHR)  GO  TO  570 
550  PRINT  560 

560  FORMAT( IX, 'WOULD  YOU  LIKE  TO  ENTER  ANOTHER  MODE  (Y , N) ' ) 

READ( 1,1250)  ANS 
IK(ANS.NE.IHY)  CALL  EXIT 
GO  TO  510 
570  PRINT  580 

580  FORMAT (IX, 'WHAT  IS  THE  DATA  FILE  NAME  ?  ') 

READ( l , 590)  FNAME 
590  FORMAT (16A 2) 

NLN=NLEN$A( FNAME, 32) 
l F( EXST$A( FNAME , NLN ) )  GO  TO  610 
PRINT  600 

hOO  FORMAT( IX , ' THE  SPECIFIED  DATA  FILE  DOES  NOT  EXIST - '/ 

HX,  PLEASE  ENTER  ANOTHER  FILE  NAME') 

GOTO  580 
610  CONTINUE 

(;******************  kkkkkkkk 

c* 

C*  SET  UP  RUN  PARAMETERS 

C* 

C*  *************’ ************ 

PI)F=0 . 

PC  F  -U . 

PRINT  C20 
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6_’o  FORMAT! IX,  DO  YOU  WANT  A  CUMULATIVE  PROBABILITY  DISPLAY  (Y,N)  1  ') 
RKA1)(  1 ,1250)  A  NS 
lr(ANS.KQ.  IUY)  PCF-i  . 

PRINT  6Ju 

oil)  FORMAT!  l  X  ,  DO  YOU  WANT  A  PROBABILITY  DENSITY  DISPLAY  ( Y  ,  N )  ?') 

REAl)(  I  ,  I  2‘jO)  A  NS 
I  :•{  ANS  .  EQ .  1HY  )  PUF=1. 

64u  PI;  INI  o3U 

6  50  FORMAT (IX, 'HOW  MANY  SIMULATION  CYCLES  WOULD  YOU  LIKE 
+  '('3000  IS  MAX)  ?') 

REAIK  l  ,* )  NCYC 

1 E( NCYC .0  T • 3000 )  GO  TO  640 

CYCLES=NCYC 

DlS=0. 

PRINT  660 

600  FORMAT! IX, 'DO  YOU  WANT  THE  RESULTS  IN  DISCOUNTED  DOLLARS  ( Y , N) ' ) 

KEAD( 1,1230)  ANS 
IF( ANS.EQ. 1HY)  DIS=1 . 

IF(DIS.EQ.0.)  GO  TO  680 
PRINT  670 

670  FORMAT ( LX , ' WHAT  LOT  WILL  DISCOUNTING  BEGIN  ?') 

READ( l  ,*)  IDF 
680  CALL  READ(NLN) 

£****ArtArtA**A****A*AA*A*A** 

c* 

C*  COMPUTE  TRANGULAR  DISTRIBUTION  CUMULATIVE  PROBABILITY  THRESHOLD  VALUES 
C*  FOR  USE  IN  GENERATING  DESIRED  VARIABLE  VALUES  FROM  A  RANDOM  NUMBER. 

C*  IF  THE  MIN,  ML,  AND  MAX  VALUES  ARE  EQUAL  SKIP  THE  CALCULATION.  ALSO, 

C*  OBTAIN  THE  DATE  AND  TIME  FROM  THE  OPERATING  SYSTEM  FOR  USE  IN  IDENTIFYING 
C*  THE  GIVEN  RUN. 

C* 

(JAAA**AAAAA*AAA*A*  AAAAAAAAA 

l X=2  735 
RN=RND( IX) 

C I PT=C IP( 3 ) 

CISST=CISS(3) 

BFT=BP( 3  ) 

BSST=BSS(3 ) 

IF(CIP(L).NE.CIP(3))  CIPT=(CIP(2)-CIP( l ) ) /( CIP(3)-CIP( 1 )) 
IF(CIS3(1).NE.CISS(3))  CISST»(CISS(2 )-CISS( 1 ) ) /(CISS(3 )-CISS( 1 ) ) 

I F( BP( I ) . NE . BP( 3 ) )  BPT»(BP(2)-BP(I))/(BP(3)-bP(l)) 
l F( bSS ( I ) . NE . BSS( 3 ) )  BSST-( BSS(2 )-BSS( l ) ) /( BSS(3)-BSS( I ) ) 

CALL  TIME$A(T IME) 

CALL  DATES A( DATE ) 

DO  780  1=1 ,NLOT 
CWP( I )=0 . 

SFPT ( I )=SFP( 1,3) 

I F(SFP( L , l ) . KQ. SFP( l ,3))  GO  TO  750 
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•  I':  ■  1  I*  f  *  l  ,  l  ))/lSEP(  i  ,  3)-SFP(  1,1)) 

1  '■  1*  ''•.»[(,  i  ;  “S  I  OS  (1,1) 

I  i’\  S »  >  S  (,  !  ,  1  )  .  i-.C) .  S I "  i ' :  i  i  ,  5  )  >  GO  TO  760 

■K.SII  i  )M  ,FSS(  I  .  .  )  '  0  SS(  l  ,  l  ))/(SFSS(  [  ,3)-SFSS(  1,1)) 

Ki)HT(l  J-ROTIO  1,3) 

1  E(KuTP(  I  ,  I  )  .i.o.koTIH  I  ,3))  GO  TO  770 

KOIP1  (  1  )-(Kol  l’(  1  ,2)  R0TP(.  1  ,  L))/(ROTP(L,3)-ROTP(I,  l)) 

/  /'•  KOI1-,  -i  I  (  1  )-KUTSS (  1,  3) 

l  K<  KOTSSU  ,  1  )  .E().ROTSS(  L  ,3))  GO  TO  780 

ROTSST(  I  )-(ROTSS(  1  ,  2  )-ROTSS(  1  ,  1  )  )  /(ROTSS(  1 , 3)-R0TSS(  I ,  l  )  ) 

.’•*u  coni  I  nee 

(K*.~kkkkXk-kJ<;kkM*kkkkkAkXkk-k 

CK 

<*  BEGIN  nib  S  f  MU LA i ION  - - - 

<;  * 

C*  GENEK.YIK  A  FIRM  UNIT  GOST  AND  PERFORMANCE  CURVE  SLOPE  FOR  THE  PRIME 
G*  AND  SEGOND  SOURCE  SUPPLIERS. 

C* 

DO  910  l-l , NCYG 
PFUC-CIP(i) 

SSFUC*C ISS( 3 ) 

PB-bP( 3) 

SSb»BSS(3) 

l  F(  C I  P(  !  )  .  E<) .  G I  P( 3  ) )  GO  CO  790 
RN-KND(  ) ) 

IF(RN.GK.CIPI)  PFUG=G I  P(3 )-SQRT( ( 1-RN)*(CIP(3 )-CIP( 1 ) )* 
E(CIP(3)-GIP(2))) 

I F( RN. L I . GI PT )  PFUC=C I P( l )+SQRT(RN*(CIP(3)-CIP(l ) )* 

P(CIP(2)-C1P(1 ))) 

790  lt(GISS(l ) .EQ.CISS( 3) )  GO  TO  800 
RN  =RND(0 ) 

IF(RN.GE.CISSI)  SSFUG=CLSS(3)-SQRT((1-RN)*(CISS(3)-CISS(1))* 

+  ( C I SS( 3  )-C I SS(2 ) ) ) 

IFIRN.LT-CLSST)  SSFUCC ISS( 1 )+SQRT(RN*(CISS(3 )-ClSS( 1 ))* 
E(C1SS(2)-CISS(1 ))) 

800  l  F  ( BP  ( l ) . EQ . bP ( 3 ) )  GO  TO  810 
RN=RND(0) 

IF(RN.CE.BPT)  PB=BP( 3 )-SQRT( ( l-RN)*( BP(3 )-BP(l ))* 
e ( BP( 3 )-BP(2 ) ) ) 

1 F(RN.LT.BPT)  PB=BP(l )-ESQRT(RN*(BP(3)-BP(l  ))* 

+  ( BP(2 )  —  B  P ( l ) ) ) 

810  l  K(  BSS  (  l  )  .  EC) .  BSS  (  3  ) )  GO  TO  820 
KN-RND(O) 

1 F(RN.GE.BSST)  SSB=BSS( 3 )~SQRT( ( 1 -RN)*( BSS(3 )-BSS(l ) )* 
e ( BSS (3)- BSS (2))) 

I F( RN.LT.BSST)  SSB-BSS ( 1 )+SQRT(RN*( BSS(3 )~BSS( 1 ) )* 
e(bss(2 )-uss(i ))) 
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hiu  SCOST(  L 

p ecus r-j. 
ssgost=o. 
qpc=o. 

QSSC-0 . 

P.4VG=0. 

SAVG=U. 

(J  A  *  k  K  A  A  *  *  *  A  A  A  *  *  A  *  A  k  A  A  *  A  A  A  A  A 

c* 

C*  CALCULATE  FIRST  UNIT  COST  AND  SLOPE  ADJUSTMENT  FOR  LOT  N  DURING  THE 
C*  GIVEN  SIMULATION  CYCLE. 

C* 

(J***A********************** 

DO  91 UJ=L , NLOT 
PSF=SFP( J , 3) 

IF(SFP(J,l).EQ.SFP(J,3))  GO  TO  830 
RN=RND(0) 

IF(RN.GE . SFPT(J ))  PSF=SFP( J , 3)-SQRT( ( l -RN)*(SFP( J , 3)-SFP( J , l ) )* 
+(SFP(J,3)-SFP(J,2))) 

I F(RN. LT.SFPT(J ))  PSF=SFP(J , I )+SQRT(RN*(SFP(J , 3)-SFP(J ,1))* 

KSKPIJ  ,2)-SFP(J  ,  L))) 

830  SSSF=SFSS(J , 3 ) 

1F(SFSS(J, L).EQ.SFSS(J,3))  GO  TO  840 
RN=RND(0 ) 

I F( RN.GE . SFSST( J ) )  SSSF=SFSS(J , 3)~SQRT( ( 1-RN)* 

+(SFSS(J ,3)-SFSS(J,L))*(SFSS(J,3)-SFSS(J,2))) 

I  F(RN .  LT  •  SFSST(J  )  )  SSSF==SFSS(J  ,  1  )+SQRT(RN*(SFSS(J  ,3)-SFSS(J  ,  1))* 
+(SFSS(J , 2)-SFSS( J , 1 ) ) ) 

B40  PROT=ROTP(J , 3) 

I F ( ROT  P ( J , 1 ) . EQ . ROT  P ( J , 3 ) )  GO  TO  850 
RN=RND(0 ) 

I F( RN.GE  .  ROTPT (  J  ) )  PROT=*ROTP(  J  ,  3)-SQRT(  (  1  -RN)* 

+( ROTP( J , 3)-ROTP( J , l ) )*(ROTP( J , 3)-R0TP( J , 2) ) ) 

1 F ( RN . LT . ROT PT  (  J  ) )  PR0T=R0TP(J , I)+SQRT(RN* 

+(ROTP(J,3)-ROTP(J , 1))*(R0TP(J,2)-R0TP(J,1))) 

850  SSROT*ROTSS( J , 3) 

IF(ROTSS(J,I).EQ.ROTSS(J,3))  GO  TO  860 
RN=RND(0) 

IF( RN .GE . ROTS ST (J ) )  SSROT=ROTSS( J , 3)-SQRT( ( I-RN)* 

+(ROTSS( J , 3)-R0TSS( J , l ) )*( ROTSS( J , 3)-R0TSS( J , 2) ) ) 

L  F( RN. LT . ROTS ST (  J ) )  SSROT=ROTSS( J , L )+SQRT(RN* 

+(ROTSS(J, 3)-R0TSS(J , l))*(R0TSS(J,2)-R0TSS(J,l))) 

(j***  Jt&  A*  kit  A* -kirk  **  *  A**  A  A  A  A  A  * 

c* 

C*  BASED  ON  THE  RUNNING  UNIT  AVERAGE  COST  FOR  EACH  SOURCE,  DETERMINE  WHICH 
C*  SOURCE  WILL  WIN  THE  MAJOR  SPLIT  QUANITY  WHEN  SPLIT  BUYS  ARE  BEING  USED. 
C*  USING  THE  SELECTED  QUANITIES,  CALCULATE  LOT  COSTS  FOR  EACH  SORCE. 

C*  INCREMENT  RUNNING  CUMULATIVE  COSTS  AND  UPDATE  UNIT  AVERAGE  COSTS. 
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C*  CONTINUE  UNITE  ALE  LOTS  HAVE  BEEN  EVALUATED  FOR  THE  GIVEN  SIMULATION  CYCLE 

C* 

c************************** 

800  I F(QPC . EQ. 0 . )  GO  TO  870 

BBP=AL0C(PB)/AL0C(2.) 

SOLE=PFUC*QPC**BBP 
PUCOST=TFUC*QPC**BBP 
lF(QSSC.EQ.O. )  GO  TO  870 
B8S=AL0G(SSB) / ALOG( 2 . ) 

S  UCOST=SS  FUC*QSSC*  *  BBS 
870  QP=QM(J) 

QSS=QP 

C* 

C* 

C*  IF  QM  AND  QS  ARE  EQUAL,  A  COMPOSITE  PERFORMANCE  CURVE  IS  BEING  USED, 

C*  THEREFORE  BYPASS  THE  LOT’  SPLIT  PROCESS. 

C* 

C* 

IF(QS(J) .EQ.QM(J))  GO  TO  890 
PAVG=PAVG*( 1 • -PSF) 

SAVG-SAVG*(L.-SSSF) 

IF(SAVG. EQ-O. )  GO  TO  880 
IF(SAVG.LT.PAVG)  QP=QS(J) 

IF(QS(J).EQ.O.)  QP=QM(J) 

C* 

C* 

C*  DECISION  RULE  :  FOR  SPLIT  BUY  AWARDS  THE  SOURCE  HAVING  THE  LOWEST  AVERAGE 
C*  PRICE  AS  OF  THIS  LOT  FOR  A  GIVEN  SIMULATION  CYCLE  IS  GIVEN  THE  MAJOR 
C*  SPLIT  QUAN1TY. 

C* 

C* 

880  QSS=QM(J)+QS(J)-QP 

890  IF(QP . EQ . QM( J ) )  CWP( J )=CWP( J )+i . 

PB=PB-PROT 

BBP=ALOG(PB) / AL0G(2 . ) 

T  FUC=PFUC 

IF(QPC . NE.O. )  PFUC=SOLE/(QPC**BBP) 

I F(QPC . NE .0 . )  TFUC=PUCOST/(QPC**BBP) 

I F( PSF . NE . 0. )  TFUC=PFUC*(1 .-PSF) 

BBP=BBP+L . 

SSB=SSB-SSR0T 
BBS“ALOG(SSB) /AL0G(2 . ) 

IF(QSSC.NE.O. )  SSFUC=SUCOST/(QSSC**BBS) 

BBS=BBS+l . 

Q 1P=QPC 
Q2P=QPCTQP 
Q 1S=QSSC 
Q2S=QSSC-FQSS 
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opi  -q2p 
QSSOQ2S 
DF  =  1  . 

IF(DIS .EQ.O. )  CO  10  900 
IF(J.LT.IDF)  GO  TO  9UU 
IJ=J-IDF+l 
DF=D  LSC(  1 J  ) 

900  YP»DF*TFUC*((Q2P+.  5 )**BBP-(Q1P+ . 5 )**BBP) /BBP 
YS=DF*SSFUC*((Q2S+.5)**BBS-(Q1S+. 5)**BBS)/BBS 
C* 

c* 

C*  IF  QM  AND  QS  AKK  EQUAL,  A  COMPOSITE  PERFORMANCE  CURVE  IS  BEING  USED, 

C*  THEREFORE  THE  LOT  COS!  FOR  EACH  SOURCE  IS  EQUAL. 

C* 

C* 

IF(QS(J) .EQ.QM(J))  YS=YP 

SCOST( I )=SCOST(I )+YP+YS 

PPCOST=PPCOST+YP 

SSCOST=SSCOST+YS 

PAVG=PPC0ST/Q2P 

I F(Q2S . NE . 0 . )  SAVG=SSC0ST/Q2S 

A  C  LOT  (  J  )  =  AC  LOT  (  J  )+  (  Y  P+Y  S  )  /  CYC  LES 

ALUC( J )=ALUC( J )+(YP+YS) /(CYCLES*(QM( J )+QS(J ) ) ) 

I F(QP . NE . 0. )  APUCL(J)=APUCL(J)+YP/QP 
I F(QSS . NE .0. )  ASUCL(J)=ASUCL(J)+YS/QSS 
910  CONTINUE 
C* 

C* 

C*  COMPUTE  THE  AVERAGE  UNIT  COST  FOR  EACH  SOURCE  AT  LOT  N.  THIS  PROCESS  IS 
C*  REQUIRED  SINCE  A  BUYOUT  PERIOD  CHANGES  THE  NUMBER  OF  CYCLES  A  GIVEN 
C*  SOURCE  WILL  APPEAR  IN  A  GIVEN  SIMULATION  RUN  DUE  TO  THE  AWARD  RULE. 

C* 

C* 

DO  920  1=1 , NLOT 

UP=CYCLES 

DS=CYCLES 

lF(QS(I).EQ.O.)  DS=CYCLES-CWP(I) 

IF(DS.EQ.O.)  DS-CYCLES 
lF(QS(I).EQ.O.)  DP=CWP( I ) 

APUCL( I )=APUCL( l ) /DP 
ASUCL(I)=ASUCL(l)/DS 
920  CONTINUE 

Q***********A************** 

c* 

C*  SORT  THE  SIMULATION  RESULTS  AND  COMPUTE  THE  CLASS  INTERVAL  SIZE  - 

C*  (MAX  -  MlN)/50  -  ALSO  COMPUTE  THE  AVERAGE  COST  AND  DETERMINE  THE 

C*  MEDIAN  COST. 

C* 
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iN-NCYC 
9  30  I  CK-0 
N-N-i 

IF(N.EQ. I )  GO  TO  %0 
DO  950  1  =  1 ,N 

I K( SCOST( l ) .GE • SCOST( I  +1  ) )  GO  TO  950 
940  liOLD=SCOST  (  1 ) 

SCOST( 1 )=SCOST ( l+l ) 

SCOST(l+l )=H0LD 
ICK=1 

950  CONTINUE 

IF(ICK.GT.O)  GO  TO  930 
960  F LNC=(SCOST(l )-SC0ST(NCYC ) ) /50 . 

ICK=NCYC/2+l 
AMlD=SCOST( ICK) 

DO  970  1=1,50 
PCOST( l )=0 . 

970  CONTINUE 
AVG=0 . 

DO  980  1=1 , NCYC 

AVG=AVC+SCOST( I ) /CYCLES 

J=((SC0ST(1)-SC0ST(NCYC))/FINC)+1. 

I E ( J . GT • 50 )  J=50 
PC0ST(J)=PC0ST(J)+1 . 

980  CONTINUE 

DO  990  1=1,50 
PCOST( I )=PCOST( I ) /CYCLES 
990  CONTINUE 

DO  1000  1=1,50 
PV( I )=1H 
1000  CONTINUE 
LC=l 
I  PAGE =0 

PRINT  1010  IFF 
1010  F0RMAT(A2) 

CALL  PAGE( I  PAGE ,LC ,TCK) 

PRINT  1130  FID 
LC=LC+7 

IF(D1S.EQ.Q.)  GO  TO  1050 

PRINT  1020 

LC=LC+3 

1020  FORMAT ( /  l  7X  ,  * <  <  RESULTS  ARE  IN  DISCOUNTED  DOLLARS  »»'/35X, 
+  '(  10%  )') 

1050  PRINT  1060  AVG.AM1I) 

LC=LC+4 

1060  FORMAT ( / 20X ,'*****  AVERAGE  COST  =  ',111,'  *****'/ 

+/20X, '*****  MEDIAN  COST  =  ',111,'  *****') 
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lbT.ULS.EQ.1.)  PR  INI'  LU20 
IF(DIS.F.Q.I)  LC=LC+3 
CALI.  HEAD  1 
LC=LC+5 

DO  lLO(j  I=l,NLOT 
T ICK=1H 

IF(DlS.EQ.O.)  CO  TO  L080 
IF(l.GE.lDF)  TICK=1H* 

1 080  CWP( l )=CWP( 1 ) /CYCLES* 1 00. 

TOTAL=QM(I)+QS(I) 

PRINT  L090  L , CWP( l ) .TOTAL, ACLOT(I ) .TICK, APUCL( I ) .TICK, 
+ASUCL(I) .TICK, ALUC(I) .TICK 

1090  F0RMAT(2X, 12 , JX , F6 . 2 , 4X , 17 ,4X, III , A1 , IX, 17 ,A1 ,4X, 

+I7.AI , 5X.I7.A1) 

LC=LC+I 

L E( LC . LT . 63)  GO  TO  1100 
CALL  ENDP(LC) 

CALL  PAGE ( I  PAGE , LC ,TCK) 

CALL  HEADl 
LC=LC+5 

L LOO  CONTINUE 

TOT  A  L=QPC+QS  SC 
PRLNT  11 10  TOTAL 
LC=LC+2 

I K ( LC . LT . 56 )  GO  TO  1150 
CALL  ENDP(LC) 

CALL  PAGE (I  PAGE, LC.TCK) 

1110  FORMAT(/ IX .'TOTAL  NUMBER  OF  UNITS  -  ',17) 

1120  FORMAT( / // ) 

1130  FORMAT( // IX , ' ID  :  ',35A2//) 

1 1 5U  PRINT  1160  DATE , T IME , FNAME 
LC=LC+4 

1160  FORMAT(/ /IX, 'DATA  USED  IN  RUN - >  ' ,2A8 , 2X, A8 , 2X, 'FROM  FILE  ' 

+ l 6A2/ IX , 79('*')) 

PRINT  1170  CIP 
LC-LC+1 

IF(LC .LT.63)  GO  TO  1175 
CALL  ENDP( LC.TCK, IFF) 

CALL  PAGE (I PAGE, LC.TCK) 

1170  FORMAT ( IX, 'PRIME  FIRST  UNIT  COST— MIN>' ,I8,2X,'M0ST  LIKELY>' , 
+I8,2X,'MAX>' ,18) 

1175  PRINT  1180  CISS 
LC=LC+l 

IF(LC. LT.63)  GO  TO  1185 
CALL  ENDP(LC,TCK, IFF) 

CALL  PAGE (I PAGE, LC.TCK) 

1180  FORMAT(  IX, 'SECOND  SOURCE - MIN>' ,  18 , 2X ,  '  MOST  LIKELY>'  , 

+1 8 , 2X , ' MAX>' , 18 ) 
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1  lrt3  PR  INI-  LI  90  BP 
LC=LC+l 

l  F ( LC . LT . 6  3  )  GO  TO  IL*5 
CALL  ENDP(LC , TCK , IFF) 

CALL  PACK(IPAGE,LC,TCK) 

11*0  FORMAT ( LX, 'PRIME  PCURVK  SLOPE - MIN>' , IX, F5. 3,4X,'MOST  LIKELY>' , 

+ 1 X , F5 . 3 , 4X , ' MAX> ' , IX, F5. 3) 

11*5  PRINT  1200  BSS 
LC=LC+1 

IKLC.LT.63)  CO  TO  1205 
CALL  KNDP(LC,TCK, IFF) 

CALL  PAGE( l PAGE , LC ,TCK) 

1200  FORMAT ( IX, 'SECOND  SOURCE - MIN>',1X,F5.3,4X, 'MOST  LIK£LY>" , 

•H  X , F5 . 3 ,4X , ' MAX>' , IX , F5 . 3) 

L  205  PRINT  1210  NCYC 
LC=LC+1 

IF(LC .LT. 56)  GO  TO  1215 
CALL  KNDP(LC,TCK, IFF) 

CALL  PAGE( I  PAGE , LC , TCK) 

L  210  FORMAT( IX, 'NUMBER  OF  CYCLES - >  ',14) 

1215  CALL  HEAD2 
LC*LC+5 

DO  1240  I«1,NL0T 

PRINT  1230  l,QM(I),QS(l),(SFP(l,J),J«l,3),(SFSS(I,J),J»l,3), 

+  (R0TP(  l,J),J=*i,3)  ,(ROTSS(I ,  J)  ,  J*1 , 3) 

LC»LC+1 

I F ( LC . LT . 6 3 )  GO  TO  1240 
IF(I.EQ.NLOT)  GO  TO  1240 
CALL  ENDP(LC,TCK, LFF) 

CALL  PAGE (I PAGE, LC, TCK) 

CALL  HEAD2 
LC-LC+5 

L  230  FORMAT ( IX,I2,2X, 14, IX, 14,'  ' , 12(1X, F4 . 2)) 

1240  CONTINUE 

CALL  ENDP(LC ,TCK, IFF) 

(J  ************************** 

C* 

C*  IF  SELECTED  GENERATE  A  CUMULATIVE  PROBABILITY  PLOT. 

C* 

(j************************** 

I F( PC F . EQ . 0 . )  GO  TO  1246 
CALL  PAGE (l PAGE, LC, TCK) 

PRLNT  1245 
SF=10 . 

CALL  SCALE(SF) 

CALL  LINE 
CUM=1 . 

CALL  Pl.OT(SF,  CUM,  NCYC,  FINC) 
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CALL  LINK 
CALL  SCALE(SF) 

PR  IN  I’  1245 

1245  FORMAT (LX,' STRATEGY  COST' , L8X , 'CUMULATIVE  PROBABILITY') 
LC=LC+57 

CALL  KNDP(LC,TCK, IFF) 

1246  IF( PDF . EQ .0)  GO  TO  L248 
CALL  PAGE( I  PAGE , LC ,TCK) 

Qkkkkkkkkkkkkkkkkkkkkkkkkkk 

c* 

C*  IF  SELECTED  GENERATE  A  PROBABILITY  DENSITY  PLOT. 

C* 

£*  ************************* 

C  UM=0 . 

SF-100. 

PRINT  1247 
CALL  SCALE(SF) 

CALL  LINE 

CALL  PL0T(SF ,CUM,NCYC , FINC) 

CALL  LINE 
CALL  SCALE(SF) 

PRINT  1247 

1247  FORMAT (IX, 'STRATEGY  COST' ,24X,' PROBABILITY') 

LC=LC+57 

CALL  ENDP(LC ,TCK, IFF) 

1248  I PAGE* l HE 

CALL  PAGE ( I  PAGE , LC , TCK ) 

PRINT  1249 

1249  F0RMAT(// , IX, 'ANOTHER  RUN  (Y,N)  ?  ') 

READ(l , 1250)  ANS 

1250  FORMAT(Al) 

IF(ANS.EQ. 1HY)  GO  TO  570 
GO  TO  550 

END 

£************************** 

c* 

C*  END  OF  MAIN  PROGRAM 

C* 

£************************** 
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(j  rt  *  *  *  kkk’kAAAAkAA-kkickkkkAkkA 

c* 

C*  SCALE  -  ARGUMENT  IS  THE  SCALE  FACTOR  TO  BE  USED  IN  LABELING  THE 

C*  PLOT  AND  LATER  CALCULATING  PLOT  POINTS. 

C* 

C*** *********************** 

SUBROUTINE  SCALE(SF) 

DIMENSION  D( 10) 

DO  1260  1=1,10 
D(I)=l/SP 
1260  CONTINUE 

PRINT  1270  D 

1270  FORMAT( l 5X , '0 . 00' , 10( l  X ,  F4 . 2  )  ) 

RETURN 

END 
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(J*KA  A*  ********************* 

c* 

C*  LINK - THIS  SUBROUT INK  SIMPLY  LAYS  OUT  THE  REFERENCE  MARKS  FOR  THE 

C*  SELECTEU  SCALE. 

C* 

£*  ******  ******************* 

SUBROUTINE  LINE 
PRINT  L280 

12BO  FORMAT(l6X,'+' , LO( ' - |')) 

RETURN 
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^J*****A************A******* 


c* 

C*  PLOT  -  ARGUMENTS  ARE  THE  SCALE  FACTOR,  SELECTION  PARAMETER  FOR 

C*  CUMULATIVE  OR  DENSITY  PLOT(CUM) ,  INTEGER  VALUE  OF  THE 

C*  NUMBER  OF  SIMULATION  CYCLES(NCYC) ,  AND  CLASS  INTERVAL 

C*  VALUE(FINC) . 

C* 


£************************** 

SUBROUTINE  PLOT(SF , CUM ,NCYC , FINC) 

REAL*8  PV , PCOST , SCOST 

COMMON  /  A  /  PV(51) ,PCOST(50) ,SC0ST(5000) 
COST=SCOST(NCYC) 

VAL=0. 

DO  1290  1=1,50 
PV( I )=IH 
1290  CONTINUE 

PRINT  1320  COST ,(PV(J),J=1,50) ,VAL 
COST=COST-F INC/2. 

DO  1330  1=1,50 
IF(CUM.EQ.O. )  VAL-PCOST(I) 

IF(CUM.EQ. 1 . )  VAL=VAL+PCOST ( I ) 

lVAL=VAL*5.*SF+.5 

DO  1300  J=1 , IVAL 

PV(J)=1H* 

1 300  CONTINUE 

IVAL=IVAL+1 
DO  1310  J-1VAL.50 
PV(J)=1H 
l 310  CONTINUE 

COST=COST+F INC 

PRINT  1320  COST, (PV(J) ,J=1 , 50) ,VAL 
1320  FORMAT (4X , II 1 , IX , ' | ' ,50AI ,2X,F6.4) 

1330  CONTINUE 
RETURN 
END 


B-l  7 


CDAP  hOUKCK  I.ISITNG 


ORIGINAL  PRIME  COMPUTER  VERSION  —  May  1982 


^************* ************* 

C* 

C*  READ  -  ARGUMENT  IS  THE  FILE  NAME  LENGTH.  THLS  SUBROUTINE 

C*  READS  THE  SELECTED  DATA  FILE  FOR  THOSE  PROGRAM  MODES  THAT 

C*  USE  AN  EXISTING  FILE. 

C* 

c**** ********************* 

SUBROUTINE  READ(NLN) 

$  INSERT  SYSCOM>A$KEYS 

COMMON/  RD  /FID(35) ,NLOT,CIP(3) ,CISS(3) ,BP(3) ,BSS(3) ,QM(25) , 

+QS (25) , SFP( 25 , 3) , SPSS (25, 3) , R0TP(2  5 , 3 ) ,ROTSS(25 , 3) ,ACLOT(25) , 
+ALUC(25) ,APUCL(25) ,ASUCL(25) ,FNAME(16) .TIME , DATE(2 ) 

REAL*8  F ID , Cl P , C ISS , BP , BSS , QM , QS , SFP , SFSS , ROTP , ROTSS , ACLOT , 

+ALUC ,APUCL, AS UCL, TIME, DATE 
INTEGER  FNAME 

1340  CALL  0PEN$A(A$REAIH-A$SAMF,FNAME,NLN,2) 

READ(6 , 1350)  FID.NLOT 
1350  F0RMAT(5X, 35A2 , 12 ) 

READ(6 , 1360)  CIP 

l 3bO  FORMAT(28X, F8 .0, 14X , F8 . 0 , 6X , F8 . 0) 

READ(6 , 1360)  CISS 
READ(6 , 1370)  BP 

1370  F  ORMAT (28X.F5.3, 17X,F5.3,9X,F5.3) 

READ(6 , 1370)  BSS 
DO  1390  '=1,4 
READ(f  30)  DUMMY 
1380  FORMAT  v.  A 1 ) 

1390  CONTINUE 

DO  1410  I-l.NLOT 

READ(6 , 1400 )  QM( I ) ,QS ( I ) ,( SFP( I , J)  , J-l , 3) ,( SFSS(I , J)  , J“1 , 3)  , 
+(ROTP( I,J),J=1,3) , (ROTSS (I , J) , J*1 , 3) 

1400  FORMAT ( 3X, F5 .0 , 1X,F5.0,12(1X,F4.2)) 

ACLOT(I)=0. 

ALUC(I)-0. 

APUCL(l)-0. 

ASUCL(I)-0. 

1410  CONTINUE 

CALL  CLOS$A( 2 ) 

RETURN 

END 
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(J************************** 

c* 

C*  CREATE  -  THIS  SUBROUTINE  IS  USED  TO  CREATE  A  NEW  DATA  FILE.  ONCE 

C*  A  FILE  NAME  HAS  BEEN  ENTERED  ITS  EX1STANCE  IS  CHECKED 

0*  TO  INSURE  A  FILE  DOES  NOT  ALREADY  EXIST  THAT  MAY  BE 

C*  OVERWRITTEN.  REMOVAL  OF  FILES  IS  HANDLED  WHILE  IN  THE 

C*  OPERATING  SYSTEM  COMMAND  MODE.  ARGUMENTS  REPRESENT  ENTRY 

C*  POINTS  WHEN  CALLED  FROM  *MODIFY.  Ml  SETS  THE  BASIC  ENTRY, 

C*  M2  IS  THE  STARTING  LOT  NUMBER,  AND  M3  IS  THE  ENDING  LOT 

C*  NUMBER. 

C* 

C* ******* ****************** 

SUBROUTINE  CREATE (Ml ,M2 ,M3) 

$  INSERT  SYSCOM>A$KEYS 

COMMON/  RD  /FID(35),NLOT,CIP(3),CISS(3),BP(3),BSS(3),QM(25), 

-PQS(25) ,SFP(25,3) ,SFSS(25,3) ,ROTP(25,3) ,ROTSS(23,3) ,ACLOT(25) , 
+ALUC(25) , APUCL(25 ) ,ASUCL(23) ,FNAME(16) ,TIME,DATE(2) 

REAL*8  F ID , CIP , CISS , BP , BSS , QM , QS , SFP , SFSS , ROTP , ROTSS , ACLOT , 

+ALUC , APUCL, ASUCL.TIME, DATE 
INTEGER  FNAME 
LOGICAL  EXST$A 
IF(Ml.EQ.l)  GO  TO  1465 
IF(M1.EQ.2)  GO  TO  1555 
IF(M1.EQ.3)  GO  TO  1495 
IF(M1 .EQ.4)  GO  TO  L 52 5 
IF(M1 . EQ. 5)  GO  TO  1535 
IF( Ml . EQ. 6)  GO  TO  1545 
I F(MI , EQ. 7 )  GO  TO  1555 
1420  PRINT  1430 

1430  FORMAT(lX,'WHAT  IS  THE  DATA  FILE  NAME') 

REA: (1,1440)  FNAME 
1440  FORMAT ( 16A2) 

N  LN-NLEN$A( FNAME , 32 ) 

I F( . NOT . ( EXST$A( FNAME , NLN )  )  1  GO  TO  1460 
PRINT  1450 

1450  FORMAT( IX, 'THAT  NAME  ALREADY  EXISTS - PLEASE  ENTER  ANOTHER') 

GO  TO  1420 
1460  CONTINUE 

CALL  OPEN$A( A$WRIT+A$SAMF , FNAME , NLN ,2) 

1465  PRINT  1470 

1470  FORMAT(// , IX, 'PLEASE  ENTER  THE  FILE  I.D.  (75  CHARACTERS  MAX)') 

READ( 1 , 1480 )  FID 
1480  FORMAT(35A2) 

IF(Ml.EQ.l)  RETURN 
1485  PRINT  1490 

1490  FORMAT ( IX, 'HOW  MANY  LOTS  ARE  THERE  IN  THIS  DATA  SET  ?  ') 

REA1)(  l  ,*  )  NLOT 
M2  =  l 
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M3=NLO  F 

IF(M1 . EQ. 2)  RETURN 
1495  PRINT  1500 

1300  F0RMAT( IK, 'FIRST  UNIT  COST  FOR  PRIME'/IX, 'MININUM  :  ') 
READ(l ,*)  CIP(l) 

PRINT  1510 

1510  FORMAT (IX,' MOST  LIKELY  :  ') 

READ( l  ,*)  CIP(2 ) 

PRINT  1520 


1520  FORMAT( IX, 'MAXIMUM  :  ') 

READ( l ,*)  CIP(3) 

I F(Ml . EQ. 3)  RETURN 

1525  PRINT  1530 

1530  FORMAT( IX, 'SECOND  SOURCE  FIRST  UNIT  COST' /IX, 'MINIMUM  :  ') 
READ( l  ,*)  CISS(l) 

PRINT  1510 
READ( I ,*)  CISS(2) 

PRINT  1520 
READCI,*)  CISS(3) 

IF(M1 .EQ.4)  RETURN 

1535  PRINT  1540 

1540  FORMAT(IX, 'PRIME  PERFORMANCE  CURVE  SLOPE  (.XXX)'/1X, 

+ 'MINIMUM  :  ') 

READ(1,*)  BP(1 ) 

PRINT  1510 
REA0(1 ,*)  BP(2) 

PRINT  1520 
READ(l ,*)  BP(3) 

I F(M1 . EQ. 5)  RETURN 

1545  PRINT  1550 

1550  FORMAT( IX, 'SECOND  SOURCE  PERFORMANCE  CURVE  SLOPE  (.XXX)'/ 
-MX, 'MINIMUM  :  ') 

READ( l ,*)  BSS(l) 

PRINT  1510 
READ(l,*)  BSS ( 2 ) 

PRINT  1520 
READ(1 ,*)  BSS(3) 

IF(M1.EQ.6)  RETURN 

1555  DO  1620  l -M2, M3 
PRINT  1560  I 

1560  F0RMAT(1X,'DATA  FOR  LOT  V  ', I2/1X, 'MAJOR  SPLIT  QUANITY') 
READ(1 ,*)  QM(I) 

PRINT  1570 

1570  FORMAT( IX, 'MINOR  SPLIT  QUANITY') 

READ(l,*)  QS(I) 

PRINT  1580 

1580  FOKMAT( IX, 'PRIME  SHIFT  FACTOR  ( .XXX) '/IX, 'MINIMUM  :  ') 
READd,*)  SFP(I.l) 
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PRINT  1510 

REAO( L  ,*)  SFP( 1,2) 

PRINT  L520 

READ( L ,*)  SFP( 1,3) 

PRINT  1590 

1590  FORMAT( LX, 'SECOND  SOURCE  SHIFT  FACTOR  (  .XXX)' /IX, 'MINIMUM 
READ(1 ,*)  SFSS(l.l) 

PRINT  1510 
READ(1 ,*)  SFSS(I ,2) 

PRINT  L520 
READ(l ,*)  SFSS(I ,3) 

PRINT  1600 

1600  FORMAT(lX, 'PRIME  ROTATION  FACTOR  ( .XXX)'/1X, 'MINIMUM  :  ') 
READ( 1 ,*)  ROTP(I , 1) 

PRINT  1510 
READ(1,*)  ROTP( 1,2) 

PRINT  1520 
READ(1 ,*)  R0TP( l ,3) 

PRINT  1610 

1610  FORMAT( IX, 'SECOND  SOURCE  ROTATION  FACTOR  (.XXX)'/1X, 

+' MINIMUM  :  ') 

READ(1 ,*)  ROTSS(I.l) 

PRINT  1510 

READ( 1 , * )  R0TSS(I ,2) 

PRINT  1520 
READ(1,*)  ROTSS(I , 3) 

1620  CONTINUE 

IF(M1.EQ.2)  RETURN 
IF(M1.EQ.7)  RETURN 
CALL  WRITE 
CALL  CL0S$A(2) 

PRINT  1630 

1630  F0RMAT(///1X, 'ANOTHER  FILE  (Y,N)  ?  ') 

READ( 1,1640)  ANS 

1640  FORMAT(Al) 

IF(ANS.EQ.IHY)  GO  TO  1420 
RETURN 
N 
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^*******************A****** 

c* 

C*  WRITE  -  THIS  SUBROUTINE  WRITES  DATA  IN  TO  A  PERMANENT  FILE. 

C*  IT  IS  USED  BY  ‘CREATE  AND  ‘MODIFY. 

C* 

C* ************************* 

SUBROUTINE  WRITE 

COMMON/  RD  /FID(35),NLOT,CIP(3),CISS(3),BP(3),BSS(3),QM(25), 
+QS125) ,SFP(25 , 3) ,SFSS(25,3) ,ROTP(25 , 3) ,ROTSS(25,3) ,ACLOT(25) , 
-*-ALUC(25)  ,APUCL(25)  ,ASUCL(25)  ,FNAME(I6)  ,TIME,DATE(2) 

REAL*8  FID , CIP , CISS , BP , BSS , QM , QS , SFP , SFSS , ROTP, ROTSS , ACLOT , 

+ ALUC , APUC  L , AS  UC  L , T IME , DATE 
INTEGER  FNAME 

WRITE(6 , 1650)  (FID(J) ,J-1 ,35) ,NLOT 

1650  FORMAT( ' ID  :  ',35A2,I2) 

WRITE(6, 1660)  (CIP(J) ,J“1 ,3) 

1660  FORMAT! 'PRIME  FIRST  UNIT  COST - MIN>' ,F8.0,2X,'M0ST  LIKELY>' 

+F8.0,2X,'MAX>' ,F8.0) 

WRITE(6 ,1670)  (CISS(J ) , J-l , 3) 

1670  FORMAT( 'SECOND  SOURCE - MIN>'  ,F8.0,2X,'MOST  LIKELY>'  , 

+F8.0,2X,'MAX>',F8.0) 

WRITE(6 , 1680)  (BP(J) ,J-1 ,3) 

1680  FORMAT( 'PRIME  PCURVE  SLOPE - MIN>' ,F5.3,5X,'MOST  LIKELY>', 

+F5.3,5X,'MAX>',F5.3) 

WRITE(b, 1690)  (BSS(J) ,J-1 ,3) 

1690  FORMAT! 'SECOND  SOURCE - MIN>' ,F5.3,5X,'MOST  LIKELY>'  , 

+F5.3,5X,'MAX>',F5.3) 

WRITE(6 ,1700) 

1700  FORMAT! /'LOT  LOT  QUAN  SHIFT  FACTOR' ,3X,' SHIFT  FACTOR', 3X, 

+ 'ROTATION  FACT', 2X,' ROTATION  FACT'/iX, '#' ,16X, 'PRIME' ,7X, 

+' SECOND  SOURCE' ,5X,' PRIME', 7X, 'SECOND  SOURCE' /5X, 'MAX  MIN', 
+2X,4!'MIN  M.L.  MAX  ')) 

DO  1720  I-l.NLOT 

WRITE(6, 1710)  I ,QM!I) ,QS!I) ,!SFP!l , J) ,J-1 ,3) ,!SFSS!I , J) ,J-1 , 3) , 
+!ROTP! I , J) ,J“l ,3) ,! ROTSS! I , J) ,J“1 ,3) 

1710  FORMAT!I2,1X,F5.0,1X,F5.0,12!IX,F4.2)) 

1720  CONTINUE 
RETURN 
END 
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C* 

C*  MODIFY  -  TULS  SUBROUTINE  ALLOWS  MODIFICATION  OF  AN  EXISTING  DATA 

C*  FILE.  WHEN  CALLED  THE  CURRENT  DATA  IS  DISPLAYED  ALONG 

C*  WITH  LOCATOR  REFERENCES.  A  GIVEN  DATA  ELEMENT  CAN  BE 

C*  MODIFIED  BY  ENTERING  THE  LOCATOR  WHICH  WILL  CAUSE  THE 

C*  APPROPRIATE  PROMPT  TO  BE  GIVEN.  THIS  ROUTINE  WILL  ALSO 

C*  ALLOW  THE  LOT  NUMBER  TO  BE  EXPANDED  WITH  CORRESPONDING 

C*  INPUT  PROMPTS  FOR  THE  EXPANDED  LOT  DATA.  IF  THE  LOT 

C*  NUMBER  IS  REDUCED  EXISTING  DATA  WILL  BE  RETAINED  AND 

C*  SLMPLY  IGNORED  WHEN  THE  SIMULATION  IS  RUN. 

C* 


C* ************************* 

SUBROUTINE  MODIFY 
$  INSERT  SYSCOM>A$KEYS 

COMMON/  RD  /FID(35) ,NLOT ,CIP(3) , CISS(3) , BP(3) , BSS(3) ,QM(25) , 
+QS(23) ,SFP(25, 3) , SFSS(25 , 3) , ROTP(25 ,3) ,ROTSS(25 , 3) ,ACLOT(25) , 
+ALUC(25) ,APUCL(25) ,ASUCL(25) ,FNAME(16) ,T1ME,DATE(2) 

REAL*8  FID,CIP,CISS,BP, BSS ,QM,QS ,SFP, SFSS ,ROTP, ROTSS , ACLOT, 

+A  LUC , APUC  L , ASUC  L , T IME , DATE 
INTEGER  FNAME 
LOGICAL  EXST$A 
1730  PRINT  1740 

1740  FORMAT( IX, 'WHAT  IS  THE  NAME  OF  THE  FILE  YOU  WISH  TO  MODIFY') 

READ( I ,1730)  FNAME 
1730  FORMAT! I 6A2) 

N  LN-NLEN$A! FNAME , 32 ) 

I F 1 E XST$A( FNAME , NLN ) )  GO  TO  1770 
PRINT  1760 

1760  FORMAT! IX, 'THE  SPECIFIED  FILE  DOES  NOT  EXIST  -  PLEASE  ENTER', 

+  '  ANOTHER  NAME') 

GO  TO  1730 
1770  CALL  READ! NLN) 

NLOTP-NLOT+1 

PRINT  1780  !FID!J),J-1 ,35),NLOT 

1780  FORMAT! //IX,'! I )  ID  :  ' ,35A2,/1X,'!2)  NUMBER  OF  LOTS  :  ',12) 

PRINT  1790  !CIP!J),J-l,3) 

1790  FORMAT! IX, '!3)  PRIME  FIRST  UNIT  COST-MIN>' ,F8.0,2X,'MOST  LIKELY>' , 
+F8.0,2X,'MAX>' ,F8.0) 

PRINT  1800  (CISS(J).J-l ,3) 

1800  FORMAT! IX , '  !4 )  SECOND  SOURCE - MIN>'  ,F8.0,2X,'MOST  LIKELY3' , 

+F8.0,2X,'MAX>' ,F8.0) 

PRINT  IH10  !BP!J),J-l,3) 

1810  FORMAT 1 l X , ' ! 5 )  PRIME  PCURVE  SLOPE - MIN>' , F5. 3, 3X, 'MOST  LIKELY>' , 

+F5.3,5X,'MAX>' ,F5.3) 

PRINT  1820  (BSS!J) ,J-1 ,3) 

1820  FORMAT! IX, '!b)  SECOND  SOURCE - M1N>' ,F5. 3 , 5X, 'MOST  LIKELY3' , 

+F3.3,5X,'MAX>' ,F3.3) 
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PRINT  1830 

1830  FORMAT ( IX, '(7 )  '  /  ' LOT  LOTQUAN  SHIFT  FACTOR' ,3X, 'SHIFT  FACTOR' ,3X, 
+' ROTATION  FACT' ,2X,' ROTATION  FACT' /IX ,'#', 16X , 'PRIME' , 7X, 

•♦■'SECOND  SOURCE' ,5X,' PRIME' ,7X, 'SECOND  SOURCE '/5X, 'MAX  MIN', 
+2X,4('MIN  M.L.  MAX  ')) 

DO  1830  l-l.NLOT 

PRINT  1840  l,QM(l).QS(I),(SFP(I,J),J-l,3),(SFSS(I,J),J-l,3), 

+(ROTP(I,J),J-l,3),(ROTSS(I,J),J-l,3) 

1840  FORMAT(I2,IX,F5.0, IX, F5 .0 , 12(1X , F4 . 2) ) 

1830  CONTINUE 
1860  PRINT  1870 

1870  FORMAT(// IX, 'ENTER  THE  NUMBER  IN  THE  (  )  THAT  CORRESPONDS  TO', 

+'  THE  LINE  YOU  WANT  TO  MODIFY') 

READ( l ,* )  LINE 
IF(LINE.LT.l)  GO  TO  1870 
IF(LINT.GT.7)  GO  TO  1870 
IF(LINE.NE.2)  GO  TO  1890 
PRINT  1880 

1880  FORMAT( IX, 'PLEASE  INPUT  THE  NEW  NUMBER  OF  LOTS') 

READ(1 ,*)  NLOTM 

I F( NLOTM . GT . NLOT )  CALL  CREATE(LINE .NLOTP, NLOTM) 

NLOT-NLOTM 
GO  TO  1920 

1890  IF  (LINE.NE.7)  GO  TO  1910 
PRINT  1900 

1900  FORMAT(lX,'WHAT  LOT  NUMBER  DO  YOU  WANT  TO  MODIFY') 

READ( 1 ,* )  LOTN 

CALL  CREATE(LINE, LOTN, LOTN) 

GO  TO  1920 

1910  CALL  CREATE(LINE, NLOT, NLOT) 

1920  PRINT  1930 

1930  FORMAT(/ / /IX, 'ANY  MORE  CHANGES  (Y,N)  ?  ') 

READ(1 , 1940)  ANS 
1940  FORMAT(Al) 

IF(ANS.EQ.IHY)  GO  TO  1860 

CALL  OPEN$A( A$WRIT+A$SAMF , FNAME , NLN , 2 ) 

CALL  WRITE 
CALL  CLOS$A( 2 ) 

RETURN 

END 
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(j  ************************** 

C* 

C*  PAGE  -  THIS  SUBROUTINE  KEEPS  TRACK  OF  INDIVIDUAL  OUTPUT  PAGES 

C*  THE  ARGUMENT  IS  THE  RUNNING  PAGE  NUMBER  AND  LINE  COUNT 

C* 

C* ************************* 

SUBROUTINE  PAGE( l PAGE , LC ,TCK) 

COMMON/  RD  /FID(35) ,NLOT,CIP(3) ,CISS(3) ,BP(3) , BSS(3) ,QM(25) , 
+QS(25) ,SFP(25, 3) , SFSS(25 , 3) ,ROTP(25 ,3) ,ROTSS(25, 3) ,ACLOT(25) , 
+ALUC(25) ,APUCL(25) ,ASUCL(25) ,FNAME(I6) ,TIME,DATE(2) 

REAL*8  FID, CLP, Cl SS, BP, BSS ,QM,QS , SFP,SFSS,ROTP, ROTSS ,ACLOT, 
+ALUC , APUCL, ASUCL.T IME , DATE 
INTEGER  FNAME.TCK 
LF(TCK.EQ.I)  GO  TO  2005 
PRINT  2000 

2000  FORMAT(79(lH-)) 

2005  IF( IPAGE.EQ. IHE)  RETURN 
IPAGE-IPAGE+L 
LC-5 

PRINT  2010  DATE, TIME, l PAGE 

2010  FORMAT( IX, 'RUN  - >  ' ,2A8, 3X.A8, 36X,'PAGE  ',12////) 

RETURN 

END 
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(J************************** 


c* 

C*  HEAD l  -  THIS  SUBROUTINE  PRINTS  THE  HEADING  ASSOCIATED  WITH 

C*  SIMULATION  LOT  DATA  RESULTS.  IT  IS  CALLED  WHENEVER 

C*  A  PAGE  BREAK  OCCURES  IN  THE  GIVEN  PORTION  OF  THE 

C*  OUTPUT. 

C* 


Q* ************************* 

SUBROUTINE  HEAD l 
PRINT  2020 

2020  FORMAT( /IX, 'PRIME  SPLIT  WIN' ,32X, 'AVERAGE  UNIT  COSTS'/IX, 

+  'PERCENTAGE'  ,  L 7X,' AVERAGE  LOT'  ,2X, ' - ', 

+' - '/IX, 'LOT  #',3X,'X',5X,'LOT  QUANITY' ,5X,'C0ST' ,7X, 

+  'PRIME'  ,  3X,  'SECOND  SOURCE'  ,2X,  'COMPOSITE '/IX,' - '  ,1X,' - ', 

+2X, ' - '  ,2X, ' - '2X, ' - '  ,2X, 

+  ' - ',2X,' - ') 

RETURN 

END 


i 
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c* 

C*  HEAD2  -  THIS  SUBROUTINE  PRINTS  THE  HEADING  ASSOCIATED  WITH 

C*  THE  DATA  PILE  DISPLAY.  IT  IS  CALLED  FOR  EACH  PAGE 

C*  BREAK. 

C* 


£***************** 

SUBROUTINE  HEAD2 
PRINT  2030 

2030  FORMAT ( / 1 6X , 'SH I FT  FACTOR 3X, ' SHIFT  FACTOR' ,3X, 'ROTATION  FACT', 
+2X, 'ROTATION  FACT'/lX.'LOT  LOT  QUAN' ,5X, 'PRIME' ,7X, 

♦'SECOND  SOURCE' ,5X, 'PRIME' ,7X, 'SECOND  S0URCE'/2X,'#' ,3X, 

♦  'MAX  MIN' ,2X,4('MIN  M.L.  MAX  ')/lX,' - ',1X,' - '  ,2X, 

+*(' - ')) 

RETURN 

END 
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Q*  A  A  **  *  **  *  *  **  kit  ilk  kit  *******  * 

c* 

C*  ENDP  -  THIS  SUBROUTINE  PADS  THE  BOTTOM  OF  EACH  PAGE  WITH  BLANK 

C*  LINES  TO  INSURE  EACH  PAGE  IS  PRINTED  IN  8  1/2  X  11  INCH 

C*  FORMAT  WHEN  USING  A  THERMAL  TYPE  TERMINAL. 

C* 

£************************** 

SUBROUTINE  ENDP(LC ,TCK, IFF) 

IF(TCK.EQ.O)  GO  TO  2035 
PRINT  2037  IFF 
2037  F0RMAT(A2) 

RETURN 
2035  LC-LC+l 

DO  2050  l»LC,t>7 
PRINT  2040 
2040  FORMAT(/) 

2050  CONTINUE 
RETURN 
END 
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